Доброго времени суток. У меня вопрос к королевству. Строю график в режиме он-лайн через TChart. Хочу, чтобы по кнопке "Остановить", график перестал обновляться, в просто висел в режиме паузы, а по нажатию кнопки "Возобновить" график снова стал отображать значения в реальном времени. Вопрос, как остановить/возобновить? ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83106

Работаю в C++ Builder 6. Хочу вручную создать файл *.bmp, чтобы лучше изучить этот формат. По ходу дела надо заполнить структуру BITMAPFILEHEADER, описанную в файле wingdi.h. Структура эта должна иметь размер 14 байт. Но чтобы так и было, выравнивание должно быть по границе слова (или отключено). Для этого разработчики обрамили определение вставками: [Code]#include typedef struct tagBITMAPFILEHEADER { WORD bfType; DWORD bfSize; WORD bfRese ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83105

Привет всем. Что-то стал часто задавать вопросы... Не бейте больно... Проблема... даже как подступиться к ней не понимаю. Имеется программулина, которая 1. Открывает вордовый документ, находит в нем все таблицы. 2. Делается селект в клипборд очередной таблицы, а в сгенеренном экземпляре экселя - соответственно паст. 3. Далее идет анализ таблицы. 4. Если анализ неудовлетворителен - переход на п.2. Почему такая связка? Эксель хорошо понимает дебильную структуру вордовых таблиц, да и для ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83104

Здравствуйте, все все все Есть необходимость по нажатии кнопки остановить выполнение процедуры. Начала изучать TThread, но не понимаю выполнения примера программы. Где собака зарыта??? И что есть что??? program potokProject1; uses Forms, potokunit1 in 'potokunit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end. unit potokunit1; interface uses Windows, Messages, SysUtils, Variants, Cl ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83103

Synapse получаю неверный, неправильный код страницы =( procedure TForm1.Button10Click(Sender: TObject); var str:string; i:integer; http:thttpsend; begin http:=Thttpsend.Create; http.HTTPMethod('get','http://www.google.ru/#newwindow=1&q='+URLEncode('Ищу')); Memo1.Lines.LoadFromStream(http.Document); end; Собственно не могу найти ссылки которые должен бы выдать такой запрос в исходном коде страницы ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83102

Есть БД таблица вида: ————————————————————— | Id | Pay | Ending | Cost | ————————————————————— | 1 | 01.01.2000 | 01.02.2000 | 200 | ————————————————————— | 1 | 03.02.2000 | 03.05.2000 | 600 | ————————————————————— | 1 | 10.06.2000 | 10.07.2000 | 300 | ————————————————————— | 2 | 12.03.2000 | 12.06.2000 | 600 | ————————————————————— | 2 | 15.06.2000 | 22.08.2000 | 400 | ————————————————————— Задача: выбрать из таблицы максимальный Ending каж ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83100

Добрый день. Понадобилось в проекте на форме (и на Panel)открыть PDF файл для просмотра. Решил использовать Webbrowser: webbrowser1.Navigate('C:\PROM\REK\1.pdf'); Результат: отрывает на форме webbrowser с сообщением NAVIGATION ... was CANCELED и тут же отдельно от моего проекта запускается Foxit Reader и в нем нормально открывается документ. Вопрос: как добиться первого и убрать второе. Спасибо. ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83099

Добрый день. Перешел на Word 2013 c Word 2010, появились проблемы с защитой файлов. В чем проблема, есть защищенный файл(режим чтения), программно снимаю защиту, для того чтоб пользователь мог его отредактировать. В 2010 версии с этим проблем не было, в 2013 валится след ошибка: // ProtectionType = 3 - документ находится в режиме чтения. if WordDoc_new.ProtectionType = 3 then WordDoc_new.Unprotect(V2); // v2 пароль Ошибка: Метод или свойство Unprotect недоступны, потому что эту кома ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83098

Здравствуйте. Хочу запаковать собственную программу с базой в установочный файл. Не знаю как, подскажите, пожалуйста, где смотреть и как сделать. Благодарю заранее за ответы. ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83097

Добрый день всем! Никогда не писал консольные приложения... Наткнулся на проблему... Приложение стартует поток (скажем менеджера конечного автомата), ожидает его завершения. Менеджер стартует кучу других потоков, с синхронизацией все нормально, но... Хотелось бы в консоли видеть некоторые события, вернее исполнение некоторых процедур (блоков алгоритма работы) этих дочерних потоков. Все дочерние потоки знают своего владельца (менеджера). В обычном оконном приложении посредством постмесадж в мен ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83096

Здравствуйте, господа. Как-то очень странно в моем случае ведет себя библиотека шифрования DcpCrypt. Некорректно отрабатывается переданный по ссылке в функцию вектор инициализации шифра. Для работоспособности приведённого ниже кода, в разделе uses необходимо подключить два модуля из даной библиотеки: DCPidea, и DCPmd5; [Code] procedure TForm1.formCreate(sender: TObject); var source, password: string; iv: word; begin source :='Жил был у бабушки серенький козлик, Бабушка очень любил ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83095

Добрый день. Есть софт, который мониторит появление носителей. .. wnd2.lpfnWndProc:= WndProc; wnd2.lpszClassName := ClassName; RegisterClass(wnd); CreateWindowExA(EX_STYLE, ClassName, nil,0,0,0, 0, 0,0 , 0, wnd.hInstance, nil); в WndProc прекрасно ловится WM_DEVICECHANGE с параметрами, все ок. Но если программу запустить от имени службы (чтобы до входа в систему уже ловило), то перестает кое что ловить. Флешки УСБ ловит, а вот к примеру подмонтированный TrueCrypt не видит ( ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83094

Здравствуйте, господа. Возникла у меня необходимость чуток строки пошифровать. В качестве шифровального станка решил использовать библиотеку CryptLib. Вытянул ее, вытянул и примеры ее использования с сайта разработчика, но, как говориться, смотрю в книггу - вижу фигу. Буквально построчно анализирую исходный текст, пытаюсь понять, что же там, собственно, происходит и не могу. Вроде бы исходник самый простой рассматривал: без закрытых и открытых ключей, без сертификатов всяких и подписей, но как о ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83092

Здравствуйте уважаемые коллеги! Вопрос к знатокам asm Имеется такая функция из исходника на MS VC++: const float c_half = 0.5f; __declspec(naked) float __hermite(float frac_pos, const float* pntr) { __asm { push ecx; mov ecx, dword ptr[esp + 12]; add ecx, 0x04; fld dword ptr [ecx+4]; fsub dword ptr [ecx-4]; fld dword ptr [ecx]; fsub dword ptr [ecx+4]; fld dword ptr [ecx+8]; fsub dword ptr [ecx]; fxch st(2); fmul c_half; fxch st(2); fmul c_half; fxch st( ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83091

Добрый день всем...или ночь... Подскажите базу знаний или киньте кодом (даже не надеюсь на последнее)... Работаю с сайтом посредством WinInet по HTTP. Использую [Code]FResult.hSession := InternetOpen(NameBrowser,INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0); FResult.hConnect := InternetConnect(FResult.hSession,cServer,INTERNET_DEFAULT_HTTP_PORT,nil,nil, INTERNET_SERVICE_HTTP,0,0); ... hRequest := HttpOpenRequest(FResult.hCo ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83090

Добрый всем день имеется текстовый файл зашифрованный пакетом DBMS_CRYPTO в Oracle и ключ в формате RAW имеет длину более 8 байт (стандартный алгоритм DES не подходит или поправьте меня) криптование происходит по алгоритму DES_CBC_PKCS5 := ENCRYPT_DES + CHAIN_CBC + PAD_PKCS5; подскажите как раскриптовать этот файл без Oracle, в сторону какого пакета/библиотеки посмотреть? заранее спасибо ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83089

Здравствуйте мира, счастья и любви вам ! Никак не могу сообразить как реализовать в Delphi: если какие либо строки (TStringlist) не начинаются с http или https - удалить эти строки. ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83088

Доброго времени суток Вопрос про Lazarus. Решил я намедни попробовать поработать с Lazarus и тут же уткнулся в проблему. Как мне указать общий путь к моим наработанным библиотекам? Распишу поподробней. У меня есть две папки 1) Projects 2) myUnits. В Delphi в опциях Delphi Option я прописывал myUnits, через точку с запятой и таким образом мог работать со своими любимыми модулями из любого даже только что созданного проекта, без необходимости переноса этих самых модулей в папку проекта. Таким ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83087

Всем, хорошего дня(вечера, ночи) :-) В рамках большого проекта делаю небольшой графический редактор для удобного создания деловой графики. В качестве основного движка GDI+ через библиотеку DevExpress. Delphi Чую Вопрос в том, можно ли каким либо образом узнать где над картинкой был сделан клик мышкой. На изображении целая куча прозрачных областей. Использовать регионы не получается, т.к. нет заданных точек. Полигоны здесь не используются. Изображение состоит из набора сформированных (нуж ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83086

Доброго времени суток, товарищи. Помогите, пожалуйста, разобраться с непонятной мне темой, а именно редакторы свойств компонентов. Собственно, аналогичная проблема уже решалась тут: %qw8567. Однако, суть дела я не уяснил. В uses добавил DesignEditors, в project/options/packages добавил designide220.bpl из поставки Delphi. А при компиляции выходит ошибка Undeclared identifier: 'TPropertyEditor'. Как, вообще, нужно писать юнит с редактором свойств? Может, я просто фигню какую-то написал? Сред ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83085