Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2017-09-04 10:53:05 ЛС | профиль | цитата
Netspirit, плохой твоя экстрасенс

Вот эта вот фигня: _prop_@CustomMethod:string; -- здорово смахивает на "автоматическую" генерацию кода-пустышки для нового элемента.
Из INI-файла, в котором св-во CustomMethod, действительно - "особаченное"
Сам не пробовал, даже не знаю, какие кнопки для этого надо нажимать, но - очень уж похоже.

А как устанавливать элементы, Netspirit, ты ведь так нигде и не написал...

--- Добавлено в 2017-09-04 10:55:09

zaperda писал(а):
Редактор элемента - Load - Save

О, подтверждается

--- Добавлено в 2017-09-04 10:57:56

zaperda писал(а):
официальную версию hiasm5

Во, блин...
5 версия уже и официальная, оказывается.

--- Добавлено в 2017-09-04 11:21:16

Galkov писал(а):
Сам не пробовал, даже не знаю, какие кнопки для этого надо нажимать

Попробовал, как указал, не побоюсь этого слова - zaperda (палитра элементов слетела, правда - перезапускать среду пришлось).
Смотрите, парни, чего получается из HTTPClient.ini -- Великим Методом Тыка:
hiHTTPClient.pas

unit hiHTTPClient;

interface

uses Kol,Share,Debug;

type
THIHTTPClient = class(TDebug)
private
public
_prop_URL:string;
_prop_Method:byte;
_prop_@CustomMethod:string;
_prop_UserAgent:string;
_prop_Referer:string;
_prop_Headers:string;
_prop_HTTPUser:string;
_prop_HTTPPass:string;
_prop_FileName:string;
_prop_AutoRedirect:byte;
_prop_##POSTParams:
_prop_@EncType:byte;
_prop_PostData:string;
_prop_UploadFile:string;
_prop_@FileField:string;
_prop_@Boundary:string;
_prop_AuthCheck:byte;
_prop_##:
_prop_##ProxyParams:
_prop_Proxy:string;
_prop_ProxyUser:string;
_prop_ProxyPass:string;
_prop_@UseSystemProxy:byte;
_prop_##:
_prop_##Timeouts:
_prop_ConnectTimeout:integer;
_prop_SendTimeout:integer;
_prop_RecvTimeout:integer;
_prop_##:
_prop_CookieManager:

_event_onUploadProgress:THI_Event;
_event_onRedirect:THI_Event;
_event_onStateChange:THI_Event;
_event_onError:THI_Event;
_event_onDownloadProgress:THI_Event;
_event_onFinish:THI_Event;
_event_onHeadersAvail:THI_Event;
_data_UploadFile:THI_Event;
_data_Stream:THI_Event;
_data_SaveTo:THI_Event;
_data_Referer:THI_Event;
_data_ProxyPass:THI_Event;
_data_ProxyUser:THI_Event;
_data_Proxy:THI_Event;
_data_PostData:THI_Event;
_data_HTTPPass:THI_Event;
_data_HTTPUser:THI_Event;
_data_Headers:THI_Event;
_data_FileName:THI_Event;
_data_URL:THI_Event;

procedure _work_doLoadString(var _Data:TData; Index:word);
procedure _work_doLoadFile(var _Data:TData; Index:word);
procedure _work_doAbort(var _Data:TData; Index:word);
procedure _work_doExecute(var _Data:TData; Index:word);
procedure _work_doLoadStream(var _Data:TData; Index:word);
procedure _var_Status(var _Data:TData; Index:word);
procedure _var_ContentLength(var _Data:TData; Index:word);
procedure _var_ContentType(var _Data:TData; Index:word);
procedure _var_CurrentURL(var _Data:TData; Index:word);
procedure _var_RawHeaders(var _Data:TData; Index:word);
procedure _var_StatusText(var _Data:TData; Index:word);
end;

implementation


procedure THIHTTPClient._work_doLoadString;
begin

end;

procedure THIHTTPClient._work_doLoadFile;
begin

end;

procedure THIHTTPClient._work_doAbort;
begin

end;

procedure THIHTTPClient._work_doExecute;
begin

end;

procedure THIHTTPClient._work_doLoadStream;
begin

end;

procedure THIHTTPClient._var_Status;
begin

end;

procedure THIHTTPClient._var_ContentLength;
begin

end;

procedure THIHTTPClient._var_ContentType;
begin

end;

procedure THIHTTPClient._var_CurrentURL;
begin

end;

procedure THIHTTPClient._var_RawHeaders;
begin

end;

procedure THIHTTPClient._var_StatusText;
begin

end;

end.
И правда ведь, в 13-строке на 11-й позиции -- собака стоит
карма: 9

0
Редактировалось 9 раз(а), последний 2017-09-04 16:06:19