Здравствуйте. Нужно создать новое поле в таблице базы MySQL если оно не существует. Для этого написал такой блок:

code:
dm1.Q_tmp.Active:=false;dm1.Q_tmp.SQL.Clear;
dm1.Q_tmp.SQL.Add('select taxkod_branch from firms limit 1');
try
  dm1.Q_tmp.Open;
except
  dm1.Q_tmp.Active:=false;dm1.Q_tmp.SQL.Clear;
  dm1.Q_tmp.SQL.Add('ALTER TABLE `firms` ADD `taxkod_branch` VARCHAR(10) NULL AFTER `taxkod`');
  dm1.Q_tmp.Open;
end; 

Q_tmp это TQuery. При запуске скомпилированной проги выскакив ...

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

Привет всем. Поискал, поискал... Неужели никому не приходилось сталкиваться с "большой закачкой" данных? Неужели никто не разбирался с BulkCopy MS SQL? Читал-читал... ничего не понял. Профайлером ловил "булки" от программы на C# - ничего похожего. Подскажите, пожалуйста, как сформировать запрос и подготовить данные. ...

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

Прошу помочь с решением следующей проблемы. Я написал функцию FileSetDateExif, устанавливающую время модификации файла JPG равным времени его создания, прописанного в Exif. Мне она нужна в связи с сведением в "одну кучу" уже модифицированных файлов JPG от разных фотоаппаратов. Программа работает как часы, - время модификации файлов устанавливается в нужное значение, но есть и огромная ложка дегтя, - при работе как под отладчиком, так и без него при установке времени каждого файла возникает ошибк ...

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

Здравствуйте можно ли записать в memo или в string значение выполнения JavaScript

code:
var
str:string;
Str:=Chromium1.Browser.GetMainFrame.ExecuteJavaScript('document.getElementsByClassName("text")[0].innerText',url,0);

Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' ...

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

Добрый день. Windows 7. Пытаюсь сделать переключение кнопкой на форме. Согласно мануалу переключение может осуществляться нажатием сочетания left Shift+left Alt+PrtSc . Использую следующий код procedure TForm1.Button1Click(Sender: TObject); var KeyInputs: array of TInput; KeyInputCount: Integer; result :Cardinal; procedure KeybdInput(VKey: Byte; Flags: DWORD); begin Inc(KeyInputCount); SetLength(KeyInputs, KeyInputCount); KeyInputs[KeyInputCount - 1].Ityp ...

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

Коллеги всем доброе утро (день, вечер). Не могу побороть компонент TDBCtrlGrid в части разрисовки компонентов, лежащих на нем.... В таблице есть ID статуса Когда я прописываю в событии OnPaintPanel код

code:
id:=DBEdit20.DataSource.DataSet.FieldByName('status_id').AsInteger;
 DBEdit20.Color:=ColorStatus[id];

то все вроде прекрасно отрисовывает, пока я не становлюсь на какую то запись.... Она перерисовывается... как этого избежать? ...

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

Здравствуйте! Прошу совета или любой помощи в такой вот задачке. В масштабе реального времени (МРВ) в приложение поступают пространственные координаты ЛА, необходимо их, так же в МРВ отображать на подложенной карте. В сторону какой ГИС посоветуете смотреть, может у кого есть похожий проект, может быть ссылки. Короче помогите кто, чем сможет. ...

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

Добрый день! Нуждаюсь в совете по такому вопросу: проект, созданный в свое время в Delphi 7, открываю в Delphi 2010. Собираю. И получаю приложение в старом интерфейсе (win 98). Как и где что изменить, чтобы интерфейс приложения стал нормальным. Заранее спасибо! ...

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

Здравствуйте. У компонента TIdTelnet есть event OnWorkEnd. Поясните пожалуйста когда он срабатывает? Мне нужно гарантировано узнать что компонента завершила прием информации (ответ на посланный запрос), и только потом её обработать. Информацию получаю в событии OnDataAvailable, но процесс длится по разному. Использую Дельфи ХЕ, (Indy 10), Win 7. ...

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

Здравствуйте! У меня вопрос по компоненту Chart. Я так понимаю, что для отображения точек на Chart разным цветом достаточно написать Chart1.Series[0].AddXY(координата X, Координата Y,'здесь задать цвет какой нужно например clGreen');, а как это сохранить в текстовый файл, что бы сначала шла координата X, потом Y, а затем код цвета ...

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

Здравствуйте! Есть Delphi 7 и скачанный TeeChart Pro 8.06 Source. Ребята напишите пожалуйста инструкцию по его установки, какие есть подводные камни и пути их обхода, короче по порядку все действия. ...

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

Здравствуйте! Не подскажете, как получить разрешение монитора, с которым разрабатывалась форма, или к значению [EM]FTextHeight[/EM] формы? Поясню. Мне необходимо пересчитывать некоторые параметры в зависимости от разрешения экрана (точнее, от соотношения разрешений экрана во время разработки и использования). В частности, в программе задаётся Constraints в зависимости от некоторых условий; так вот их нужно масштабировать. Сейчас мы договорились в группе, что разраб ...

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

Всем привет! Дело такое: Работаю вахтовым методом на удалённом объекте, сотовой связи нет. Интернет есть. Комп только у начальника в кабинете. Мне нужно проверять почту и своевременно отвечать на поступившие письма. Для этого приходится раз в день просится к компу - что не только меня, но и начальника уже немного напрянает. Поэтому я написал сервис, который сканирует мой емэйл и зажигает на LPT светодиодик, если поступило новое письмо. Сервис работает идеально, но только тогда, когда комп, ко ...

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

Доброго времени суток! Нужно "слушать" общение клиент/сервер и при нужной информации в запросе поймать ответ. Сервер чужой, клиент - online flash, тоже чужой. Для этого, как я понял нужно WinPcap использовать. c WinPcap никогда дела не имел, пытаюсь разобраться Поставил magsys.co.uk/delphi/magmonsock.asp ловлю я нужные пакеты через WinPcap, через то самое единственное событие в TMonitorPCap - OnPacketEvent но нигде не могу найти SeqNr пакета и их количество, принадлежащее одному ответу, чт ...

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

Здравствуйте! Помогите пожалуйста с доработкой кода. Есть MDI-приложение, в каждом его окне компонент TChart, помимо всего прочего на кнопки клавиатуры заведены масштабирование и прокрутка для активного окна (см.код). Сейчас понадобилось сделать так, чтобы при прокрутке в активном окне, в остальных окнах тоже шла прокрутка. Как это осуществить? [Code]procedure TfChild.ScrollAxis(Axis: TChartAxis; const Percent: Double); var Amount: Double; begin with Axis do begin Amount := ...

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

Всем доброго времени суток! Вопрос на стыке Delphi и C++. На C++ не писал давно и не писал чего-то сложного. Имеется рабочая библиотека, написанная в Delphi, которая реализует некий COM-интерфейс IA. Этот интерфейс агрегирует другой интерфейс IB. В программа на Delphi все работает четко и красиво, внутренний интерфейс доступен как IA.IB. Но я совсем запутался, как получить интерфейс IB в коде на С++ (gcc). Делфийская DLL экспортирует функцию для получения главного интерфейса и всё работ ...

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

Доброго времени суток! Возникла следующая проблеммка: Имеем Frame, который через свойство получает компонент извне. Каким образом этот Frame может корректно реагировать на события данного компонента? Компонент может быть любой, Фреймов на форме несколько, компонент получают один и тот же. Сам компонент про Frame не знает. При перекрытии его обработчика из Frame, теряем возможность использовать это событие на форме. Как в Delphi корректно подойти к решению такого вопроса? ...

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

Тема: Проблема с распаковкой архива .bz2 при помощи 7zip Нужно программно распаковать архив BZ2. Для этого использую архиватор 7-zip (sevenzip.pas и 7z.dll) со следующим кодом:

... uses SevenZip; ... begin with CreateInArchive(CLSID_CFormatBZ2) do begin OpenFile('B:\TF2 md\Archiv1\example.csv.bz2'); ExtractTo('B:\TF2 md\Archiv1'); end; end;

Проблема: на строчке ExtractTo('B:\TF2 md\Archiv1') выдает ошибку "Cannot create file "'B:\TF2 md\A ...

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

Камрады, прошу помощи. В своей работе периодически использую небольшую расчетную программу EXE, запускаемую в консоли в режиме командной строки. Работает эта программа в двух вариантах : 1. В командной строке указываем значения нескольких параметров для расчета, а в конце после них - имя файла данных, для которых и должен быть сделан расчет. Файл данных - обычный текстовый файл с единственной строкой, в которой записаны несколько чисел через пробелы. Программа вводит этот файл и выдает ...

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

Добрый день. Мне нужно программно отключить сглаживание неровностей экранных шрифтов. Изменить значение в реестре не проблема, а как сделать, чтобы это изменение было принято без перезагрузки компьютера? вариант "RunDll32.exe USER32.DLL,UpdatePerUserSystemParameters ,1 ,True" - выполняется, но сглаживание шрифтов остается. Может, кто-то сталкивался с такой проблемой? ...

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