FreePascal.ru

Попробуйте

SMTP.Sock.HTTPTunnelIP := '127.0.0.1';
SMTP.Sock.HTTPTunnelPort := 8080';
SMTP.Sock.HTTPTunnel:=true;


Соединение через HTTP-прокси возможно только если прокси-сервер поддерживает метод CONNECT. Большинство серверов должно его ...

Вы скачали старый порт под Lazarus. Есть новый http://sourceforge.net/projects/lazarus-ccr/files/VirtualTreeView%20%28New%20Port%29/

Не всегда имеет смысл обрабатывать исключения в каждой процедуре/методе.
Например:

//Одна из множества процедур, вызываемая из RunBigOperation
procedure SomethingWrong;
begin
//Выделяем память
try
........
raise Exception.Create('Что-то пошло не так ...

Mr.Smart
Ну это я и так понял. Хорошо если нужно один компонент добавить. А когда форму только начинаешь проектировать и нужно несколько постоянное нажатие F12 не удобно.

А как вы при anchordocking работаете с формой? У меня что-то никак не получалось. Нажимаю F12 форма появляется, выбираю компонент из палитры - форма тут же скрывается и отобразить ее можно только опять нажав F12. Также и при изменении свойств в инспекторе объектов. Хоть с формами и мало работаю, по ...

Скорее всего про это

да пожалуста, скажите как через synapse http узнать размер файла на сервере не скачивая сам файл?
Самый простой способ это послать запрос HEAD

http.HTTPMethod('HEAD','http://example.org/file.exe');
Size:=-1;
for i := 0 to http.Headers.Count - 1 do
begin
if ...

У TStringList есть методы Text, CommaText, DelimitedText

Иван Шихалев
Потому что в ветку master Graeme решил добавлять свои изменения кода Lazarus, а синхронизировать из SVN trunk в ветку upstream
http://wiki.lazarus.freepascal.org/git_mirrors

GAMER
Используйте код от Brainenjii плюс обнуляйте указатель fCreator при закрытии формы TFrm2.
Либо на OnDestroy fCreator:=nil;
Либо если вручную уничтожаете, то уничтожайте через FreeAndNil(fCreator)

Было такое же, что не находил виджеты. Добавил в lpr файл библиотеки uses Interfaces и все собралось.

А что за функция CreatePenHandle? Это явно не WinAPI, а какая-то своя.

А для WinAPI функций попробуйте вместо модуля Windows использовать LCLIntf. Я так понял что через него эмулируются некоторые WinAPI функции средствами текущего виджетсета.

А программа на другом компьютере тоже самописная?
Если да, то почему бы той программе не возвращать результат операции?
Т.е. псевдокод клиента выглядит так:

Send(..); //отправляем данные
s:=ReadString(); //считываем результат операции
if SameText(s,'OK') then
//Данные успешно ...

У меня вот такой код работает. FPC 2.4.0, Lazarus 0.9.29
procedure TForm1.Button1Click(Sender: TObject);
var
path: string;
Excel, Sheet: OleVariant;
begin
path:=ExtractFilePath(Application.ExeName)+'Reports\blank_z.xls';
Excel:=CreateOLEObject('Excel&#46 ...