Einzelnen Beitrag anzeigen

richie_k

Registriert seit: 9. Dez 2006
10 Beiträge
 
#1

Access Violation bei manchen Versionen von Windows?

  Alt 4. Mär 2008, 18:17
Hallo!
Habe gerade ein Programm fertiggestellt - auf meinem Rechner und auf meinem Laptop läuft es Einwandfrei, auf dem von meinem Kumpel will es nicht laufen.. die berühmte Access violation..

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  htmlcontent:string;
begin
  htmlcontent:='u';
  htmlcontent:=GETHTML('http://www.link.de/status.php?username='+Edit1.Text+'&password='+Edit2.Text);
  while (htmlcontent= 'u') do
  begin
    form1.caption:='Überprüfung...';
    sleep(1000);
  end;
  if htmlcontent[1]= '1then
  begin
    login:=true;
    FormActivate(Sender);
  end
  else
    Form1.caption:='Login';
end;
Ich glaube es liegt am htmlcontent[1], aber was kann ich machen, damit da auf keinen fall solch eine Message kommt?
hilfe
ach ja getHTML liest einfach die seite aus.. die seite gibt 0 oder 1 zurück, jenachdem, ob name und passwort stimmten oder nicht.

Freue mich auf Hilfe! DAnKE

Richie
  Mit Zitat antworten Zitat