Probier es mal so (also immer ohne das Form2 davor):
Code:
procedure TForm2.FormCreate(Sender: TObject);
var inid: TIniFile;
begin
inid:=TIniFile.Create(ExtractFilePath(paramstr(0))+'data.ini');
try
Edit1.Text:=inid.ReadString('Anmeldung','Name','');
Edit2.Text:=inid.ReadString('Anmeldung','Pwd','');
CheckBox1.Checked:=inid.ReadBool('Anmeldung','PwdSv',False);
CheckBox2.Checked:=inid.ReadBool('Anmeldung','AutoAnm',False);
finally
inid.free;
end;
AlphaBlendValue := 0;
Timer1.Enabled := True;
end;
Das er in der Prozedur nichts schreiben kann ist ja klar, denn dafür müsstest du WriteString und WriteBool verwenden.
[Edit]Ups, Luckie war schneller...[/Edit]