Topic: проверить oleobject
мне нужно проверить существует или нет и если нет, то создать
http:=createoleobject('WinHttp.WinHttpRequest.5.1');
My Visual Database → Russian → проверить oleobject
мне нужно проверить существует или нет и если нет, то создать
http:=createoleobject('WinHttp.WinHttpRequest.5.1');
var
http: variant;
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
if VarType(http)=varNull then http:=createoleobject('WinHttp.WinHttpRequest.5.1');
end;
My Visual Database → Russian → проверить oleobject
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi