Кстати да, согласен, в лог информацию очень надо передавать. Вот за пару минуток набросал примерчик, его можно допилить:
var
AProcess:TProcess;
begin
AProcess := TProcess.Create(nil);
AProcess.Executable := 'cmd';
AProcess.Parameters.Add('/c');
AProcess. ...
Найдено 20 результатов
- 23.03.2019 08:00:01
- Форум: Общее
- Тема: Программа автоматизации процессов на FreePascal
- Ответы: 10
- Просмотры: 30779
- 09.01.2019 21:50:13
- Форум: Lazarus
- Тема: Delete, Length в Lazarus
- Ответы: 13
- Просмотры: 15364
Re: Delete, Length в Lazarus
На самом деле, можно использовать http://wiki.freepascal.org/Lazarus_with_FPC3.0_without_UTF-8_mode но лучше просто перевести все проекты на UTF-8. Мне кажется, это в дальнейшем (при интернационализации) избавит от головной боли.
- 09.01.2019 21:31:07
- Форум: Общее
- Тема: Отслеживание изменений в каталоге
- Ответы: 7
- Просмотры: 21923
Re: Отслеживание изменений в каталоге
zi000000 , Лазарус реагирует точно.
Он реагирует, но не так, как надо автору вопроса. Он реагирует только при получении фокуса. Можете проверить: скопируйте файл, открытый в редакторе Lazarus в укромное место, поиздевайтесь над ним как хотите, посохраняйте, главное - чтобы Lazarus фокус не получал ...
Он реагирует, но не так, как надо автору вопроса. Он реагирует только при получении фокуса. Можете проверить: скопируйте файл, открытый в редакторе Lazarus в укромное место, поиздевайтесь над ним как хотите, посохраняйте, главное - чтобы Lazarus фокус не получал ...
- 09.01.2019 21:08:18
- Форум: Общее
- Тема: Картинки в заголовке TabSheet
- Ответы: 25
- Просмотры: 50103
Re: Картинки в заголовке TabSheet
Наковырял статью для рисования на WinAPI:
https://docs.microsoft.com/en-us/window ... b-controls
Вроде как даже по материалам статьи что-то рисуется. Кроссплатформенного решения найти навскидку мне не удалось.
https://docs.microsoft.com/en-us/window ... b-controls
Вроде как даже по материалам статьи что-то рисуется. Кроссплатформенного решения найти навскидку мне не удалось.
- 01.10.2018 23:29:45
- Форум: Обучение Free Pascal
- Тема: Lazarus DBF понимание рабочего кода
- Ответы: 2
- Просмотры: 10321
Re: Lazarus DBF понимание рабочего кода
Dbf1.Fields[i].OnGetText := @From1251;
Работает она совершенно прозрачно - назначает обработчик события, ровно то же самое вы делаете каждый раз, когда кидаете на форму кнопку и нажимаете по ней двойным кликом мыши, а потом пишете код в магическим образом появившемся окошке ...
Работает она совершенно прозрачно - назначает обработчик события, ровно то же самое вы делаете каждый раз, когда кидаете на форму кнопку и нажимаете по ней двойным кликом мыши, а потом пишете код в магическим образом появившемся окошке ...
- 01.10.2018 22:24:02
- Форум: Обучение Free Pascal
- Тема: Использование WinApi для создания пула потоков
- Ответы: 62
- Просмотры: 90673
Re: Использование WinApi для создания пула потоков
Я могу сказать, что существует встроенный системный пул. Называется "порт завершения ввода-вывода". Создаётся:
fCompletion:=CreateIoCompletionPort(INVALID_HANDLE_VALUE,0,0,Length(fThreads));
Задачи в этот порт пихаются:
PostQueuedCompletionStatus(fCompletion,0,0,POverlapped(Data));
А рабочий ...
fCompletion:=CreateIoCompletionPort(INVALID_HANDLE_VALUE,0,0,Length(fThreads));
Задачи в этот порт пихаются:
PostQueuedCompletionStatus(fCompletion,0,0,POverlapped(Data));
А рабочий ...
- 01.10.2018 19:35:25
- Форум: Базы данных
- Тема: СУБД MariaDB блокирует работу Lazarus и MySQL
- Ответы: 5
- Просмотры: 48512
Re: СУБД MariaDB блокирует работу Lazarus и MySQL
Возможно, есть вариант положить libmysqlclient.so прямо в папку с программой? В Windows подобная техника заставляла программу вынужденно подгрузить библиотеку из собственной папки, чем достигался требуемый эффект.
- 01.10.2018 19:31:11
- Форум: Алгоритмы
- Тема: ReverseString для кодировки UTF-8
- Ответы: 8
- Просмотры: 34238
ReverseString для кодировки UTF-8
Во время чтения очередной статьи про собеседования на программиста, столкнулся с такой простой на первый взгляд задачей: претенденту предложили написать функцию, которая "переворачивает" строку. Аналог ReverseString, но свой. Ответ, который дал претендент, не устроил собеседователя. Оказалось, что ...
- 08.04.2018 14:45:34
- Форум: Free Pascal Compiler
- Тема: Клонирование объекта класса
- Ответы: 20
- Просмотры: 26335
Re: Клонирование объекта класса
2. Bar := Foo;
Bar, как уже было сказано выше, стал указателем на Foo
А Foo мы совсем потеряли, но сам экземпляр остался в памяти, но доступа к нему у Вас уже нет. Произошла утечка памяти.
Наоборот как раз. Bar мы потеряли, экземпляр остался в памяти. Если он создавался ранее, конечно. Ведь про ...
- 11.03.2018 19:40:06
- Форум: Free Pascal Compiler
- Тема: Типы данных
- Ответы: 133
- Просмотры: 175118
Re: Типы данных
Я не знаю, зачем нужен был вообще тип TObject, но тому кто это придумал но путаницы это прибавило знатно.
В чём разница написано в документации m)
А вот для чего изобрели - тоже можно понять. Дело в том, что object располагается на стеке, если хочется разместить его в динамической памяти - то ...
В чём разница написано в документации m)
А вот для чего изобрели - тоже можно понять. Дело в том, что object располагается на стеке, если хочется разместить его в динамической памяти - то ...
- 11.03.2018 18:27:19
- Форум: Алгоритмы
- Тема: Поразрядный вывод целого числа
- Ответы: 5
- Просмотры: 32407
Re: Поразрядный вывод целого числа
Могу предложить универсальное решение, которому по барабану, какое целое, или даже с плавающей точкой число вы хотите посмотреть:
// преобразует указанный объект в его двоичное строковое представление
// Если Raw=true, то дополнительные разделители между байтами не используются
// Если Raw=false ...
// преобразует указанный объект в его двоичное строковое представление
// Если Raw=true, то дополнительные разделители между байтами не используются
// Если Raw=false ...
- 11.03.2018 17:36:01
- Форум: Free Pascal Compiler
- Тема: Гы. Уши бага №27221 растут из версий 0.9x
- Ответы: 4
- Просмотры: 6345
Re: Гы. Уши бага №27221 растут из версий 0.9x
Хм... например, у ShellExecute есть такая фишечка, что сравнивать результат надо как <32, если нет желания сравнивать с КАЖДЫМ из возможных кодов ошибок. Так что не везде такой подход является вредным.
- 11.03.2018 14:22:55
- Форум: Общее
- Тема: При активном потоке, не закрываются формы
- Ответы: 8
- Просмотры: 24145
Re: При активном потоке, не закрываются формы
Посмотрите, не пропал ли ModalResult у кнопки, которой диалог модальный закрываете? У меня как-то пропал, я нервничал, что не работает, тоже кучу способов перепробовал, а оказалось, что всё так просто.
- 11.03.2018 14:15:50
- Форум: Общее
- Тема: Одна программа и несколько GUI к ней, как это работает?
- Ответы: 6
- Просмотры: 21071
Re: Одна программа и несколько GUI к ней, как это работает?
Как правило, GUI к консольным утилитам запускает консольную утилиту скрытно (самый распространённый пример - ffMpeg, на нём 95% Windows-конверторов форматов базируются... и нет, я не согласен, что проще командную строку написать, из GUI утилиты проще выбрать пресет, кинуть туда пять файликов, нажать ...
- 26.01.2018 23:59:05
- Форум: Обучение Free Pascal
- Тема: Как изменить позицию курсора мыши на форме?
- Ответы: 3
- Просмотры: 10463
Re: Как изменить позицию курсора мыши на форме?
Простите, но чем SetCursorPos не подходит?
