Memasukan Enviroment variables di delphi 7
pada halaman sebelum nya saya memposting beberapa Enviroment variables pada windows Xp/7 , enviroment variable yang tercantum itu belum bisa di gunakan langsung pada delphi 7 jadi membutuhkan beberapa trik agar script nya bisa jalan di delphi 7 berikut caranya :
suber ilmu : https://www.experts-exchange.com/questions/20615041/Set-Windows-environmental-variables-path-using-Delphi.html
var
str1, str2: string;
begin
str1 := GetEnvironmentVariable(PCH ar('Temp') );
showmessage(str1);
SetEnvironmentVariable(PCh ar('Temp') ,PChar('C: \Better put back the old one'));
str2 := GetEnvironmentVariable(PCh ar('Temp') );
showmessage(str2);
SetEnvironmentVariable(PCh ar('Temp') ,PChar(str 1))//reset old value
end;
str1, str2: string;
begin
str1 := GetEnvironmentVariable(PCH
showmessage(str1);
SetEnvironmentVariable(PCh
str2 := GetEnvironmentVariable(PCh
showmessage(str2);
SetEnvironmentVariable(PCh
end;

0 komentar:
Posting Komentar