EAccesss Violation

[Aya]

Hi,

in diesem Code schnipsel ist kein fehler... von daher kann ich dir auchnicht weiter sagen was das Problem ist..

Aber, du kannst dir ein paar begin's/End's sparen
hier z.B.:

Delphi-Quellcode:

procedure TForm4.Formcreate(Sender: TObject); 
begin 
begin 
  ini:=TIniFile.create('./File1.ini'); 
  try 
    Pass:=ini.ReadString('Form','Pass','Horst'); 
    Pass1:=ini.ReadString('Benutzer','Pass','Horst'); 
  finally 
    ini.free; 
    end; 
end; 
end;

das reicht so völlig:

Delphi-Quellcode:

procedure TForm4.Formcreate(Sender: TObject); 
begin 
  ini:=TIniFile.create('./File1.ini'); 
  try 
    Pass:=ini.ReadString('Form','Pass','Horst'); 
    Pass1:=ini.ReadString('Benutzer','Pass','Horst'); 
  finally 
    ini.free; 
  end; 
end;

Au'revoir,
Aya~