Я делаю так в FPC. Работает и в linux и в windows:
type
{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ private declarations }
procedure FreeObject(Data: PtrInt);
public
{ public declarations }
end;
var
Form1: ...
Найдено 78 результатов
- 12.10.2011 08:44:23
- Форум: Lazarus
- Тема: Ошибка при удалении кнопки из ее события
- Ответы: 13
- Просмотры: 6663
- 21.07.2011 08:29:25
- Форум: Lazarus
- Тема: Firebird+Zeos кодировка
- Ответы: 2
- Просмотры: 2294
Re: Firebird+Zeos кодировка
Указывается кодировка в которой нужны данные клиенту т.е. вашей программе а вот кто конвертирует клиентская библиотека или классы доступа к БД не знаю( надо смотреть
- 23.06.2011 11:34:33
- Форум: Lazarus
- Тема: Драйвер сканера штрих кода
- Ответы: 25
- Просмотры: 17698
Re: Драйвер сканера штрих кода
Я реализовывал библиотеку для сканеров штрих-кодов: поддерживает com, keyboard, usb сканеры с кодам EAN13 и PDF-417 только в настройке сканера нужно включить: префиксом AIMCODE и два суффикса #10#13 (возврат каретки)
Реализовано через хуки windows. Через Com работает стабильно. а вот usb и ...
Реализовано через хуки windows. Через Com работает стабильно. а вот usb и ...
- 15.04.2011 20:33:48
- Форум: Lazarus
- Тема: Проверка состояния FTP сервера
- Ответы: 6
- Просмотры: 4027
Re: Проверка состояния FTP сервера
Проверка коннекта ftp_сервер:21, ну и наверняка проверить,что сервер в сокет выдал приглашение: 220 FTP server ready.
- 31.03.2011 06:32:42
- Форум: Lazarus
- Тема: Буфер обмена
- Ответы: 16
- Просмотры: 10903
Re: Буфер обмена
добавте в проекте в uses модуль Interfaces
- 30.03.2011 07:49:26
- Форум: Lazarus
- Тема: Буфер обмена
- Ответы: 16
- Просмотры: 10903
Re: Буфер обмена
ADR. Я же вам на болгарском языке ответил: "Добавьте зависимость в проект от LCL" 
- 24.03.2011 08:32:20
- Форум: Lazarus
- Тема: Буфер обмена
- Ответы: 16
- Просмотры: 10903
Re: Буфер обмена
Вие трябва да добавите проект зависимости от LCL
Куда вообще модераторы смотрят?!
Куда вообще модераторы смотрят?!
- 16.03.2011 06:40:04
- Форум: Общее
- Тема: подскажите функцию *tostr
- Ответы: 6
- Просмотры: 14878
Re: подскажите функцию *tostr
IntToHex(...);
HexToBin(...);
OctStr(...);
binStr(...);
hexStr(...);
HexToBin(...);
OctStr(...);
binStr(...);
hexStr(...);
- 21.02.2011 09:31:25
- Форум: Lazarus
- Тема: Кроссплатформенный способ хранения настроек
- Ответы: 3
- Просмотры: 2762
Re: Кроссплатформенный способ хранения настроек
Почти всегда в лазарусе использую:
Код: Выделить всё
with TXMLConfig.Create(nil) do
try
Filename:=GetAppConfigDir(false);
s:=GetValue(.....
finally
free;
end; - 21.02.2011 09:25:10
- Форум: Базы данных
- Тема: Zeos и макросы
- Ответы: 18
- Просмотры: 39813
Re: Zeos и макросы
У меня проект "горел", допилил для FPC правильное получение блоба. но времени не было еще и в дельфи проверять. тем более разработка в linux велась. Изменить мир хотел, но потом забыл о проблеме 
Будет время и настроение то добью
Будет время и настроение то добью- 20.02.2011 17:57:32
- Форум: Базы данных
- Тема: Zeos и макросы
- Ответы: 18
- Просмотры: 39813
Re: Zeos и макросы
мх...Я тут пытался переделанную мной функцию ReadBlob для Oracle9i внести в исходники ZeosDBO когда NLS 1251, так парень бельгиец упорно не хотел вносить изменения...говорит сам доделай кусок у меня под Дельфи не компилируется. Не знаю чего он там мучился))) Убрать {$IFDEF FPC} да допилить надо было ...
- 20.11.2010 12:19:00
- Форум: Общее
- Тема: Коннект к Oracle через ZeosComponents
- Ответы: 11
- Просмотры: 23964
Re: Коннект к Oracle через ZeosComponents
У меня не было коннекта у компонентов Zeos 7.0 Dev. переставил на 6.6-stable всё заработало
- 08.11.2010 18:25:32
- Форум: FBManager
- Тема: TurboBird - Firebird Administration tool
- Ответы: 3
- Просмотры: 27438
Re: TurboBird - Firebird Administration tool
да.... wine+ibexpert, ну FlameRobin на крайний случай
- 07.06.2010 06:13:21
- Форум: Lazarus
- Тема: Количество подключений к базе
- Ответы: 4
- Просмотры: 3598
Re: Количество подключений к базе
Firebird 2.1:
Код: Выделить всё
select * from MON$ATTACHMENTS
- 03.06.2010 06:35:26
- Форум: Extended Pascal Component Library
- Тема: EPCL 0.0.0.2
- Ответы: 2
- Просмотры: 24364
Re: EPCL 0.0.0.2
Может пригодится, конечно, кому.... но костыли это всё. С++ добрался до Паскаля
{ Global variable x is 6 }
log<<'Global variable x is '<< x <<endl;
log<<'Gobal variable m is '<< m <<endl;
log<<'test: ' + 1.6 + '; ' + r + '; ' + m + endl;
Заключение
Использование exStrings в теории должно ...
{ Global variable x is 6 }
log<<'Global variable x is '<< x <<endl;
log<<'Gobal variable m is '<< m <<endl;
log<<'test: ' + 1.6 + '; ' + r + '; ' + m + endl;
Заключение
Использование exStrings в теории должно ...