Einzelnen Beitrag anzeigen

greyblue

Registriert seit: 11. Sep 2003
47 Beiträge
 
#1

Accessviolation Unter Win98!!

  Alt 5. Mär 2004, 21:35
Hallo

der Programm läuft unter WinXP einwandfrei, aber unter Win98 bekommt man eine Zugriffsverletzung nach dem Klicken auf dem Button!

Delphi-Quellcode:
procedure TForm2.BitBtn1Click(Sender: TObject);
var applpath:String;
begin
    applpath := extractfilepath(application.ExeName);

    if MessageDlg('blabla',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
      begin
        if Length(edit1.Text) = 5 then
          begin
            Form1.ListBox2.Items.Clear;
            Form1.listbox2.Items.Add(edit1.Text);
            Form1.listbox2.Items.SaveToFile(applpath + 'log.txt');
            Form1.Label2.Caption:=edit1.Text;
            close;
          end
        else
          messagedlg('blabla',mtInformation,[mbok],0);
      end;

end;
Kann jemand mir helfen? Danke !!
  Mit Zitat antworten Zitat