Zitat von
Klaus01:
iehttp1.ExecuteURL('http://www.luphisoft.de/toolbar/version.txt').sl.text <> version then
oder
Delphi-Quellcode:
iehttp1.ExecuteURL('http://www.luphisoft.de/toolbar/version.txt');
if iehttp1.sl.text <> version then
Grüße
Klaus
Haab ein Problem er gibt immer "ok" zurück egal was in der version.txt steht...
Delphi-Quellcode:
const version = '1.5.0'
...
procedure TForm1.Button1Click(Sender: TObject);
begin
iehttp1.ExecuteURL('http://www.luphisoft.de/toolbar/version.txt');
if iehttp1.sl.Text <> version then
Edit1.Text:='ok'
else Edit1.Text:='no';
end;
Zitat von
version.txt:
1.5.1
Aber er gibt immer ok zurück