W wywołaniu procedury ShellExecute()
:
function AdresIPFaktyczny:string;
begin
ShellExecute(Handle,'Open','D:\Autoryzacja\DajIP.bat',
nil,nil,SW_HIDE);
end;{of AdresIPFaktyczny}
wystąpił nieoczekiwany błąd Undeclare Identifier:Handle
, a nieoczekiwany dlatego, że w innym programie identyczne wywołanie:
procedure TForm1.Button5Click(Sender: TObject);
begin
ShellExecute(Handle,'Open','D:\Autoryzacja\DajIP.bat',
nil,nil,SW_HIDE);
end;
dało spodziewany wynik. Nadmieniam, ze w uses umiściłem w obu przypadkach moduł ShellApi. No i jestem w kropce Bądź aniołem i pomóż mi,