Модератор: Модераторы
/Developer/lazarus/lcl/interfaces/cocoa/cocoaint.pas(28,2) Warning: Illegal compiler switch "OBJECTIVEC1"
/Developer/lazarus/lcl/interfaces/cocoa/cocoaint.pas(1,1) Fatal: Can't find unit CocoaAll used by CocoaInt
Kitayets писал(а):у скайпа вверху тулбар. добавь его, посмотри как будет выглядеть. Вообще такой интерфейс довольно легко делается... сверху тулбар, слева дерево (скорее всего стандартное) - справа: панель вверху и самописный виджет списка контактов. Т.е. форма довольно простая - один не стандартный виджет (список контактов) ну и поле ввода для поиска, всё остальное СТАНДАРТНОЕ.
Padre_Mortius писал(а):Я бы не рекомендовал пользоваться нестабильным и заброшенным компонентом... Лучше использовать Synapse для таких целей или libcurl
да пожалуста, скажите как через synapse http узнать размер файла на сервере не скачивая сам файл?
http.HTTPMethod('HEAD','http://example.org/file.exe');
Size:=-1;
for i := 0 to http.Headers.Count - 1 do
begin
if Pos('CONTENT-LENGTH:',UpperCase(http.Headers[i]))>0 then
begin
Size:= StrToIntDef(Trim(SeparateRight(http.Headers[i], ' ')), -1);
break;
end;
end;
Вернуться в Обучение Free Pascal
Сейчас этот форум просматривают: Yandex [Bot] и гости: 3