Gespeichertes Level laden. Level wird als TXT-Datei gespeich

[Mirilin]

Delphi-Quellcode:

procedure TForm1.FormShow(Sender: TObject);
var ini: TIniFile;
begin
  ini:=TIniFile.Create('konfig.ini');
  try
    form1.left:=ini.ReadInteger('Fensterposition','Left',0);
    form1.top:=ini.ReadInteger('Fensterposition','Top',0);
  finally
    ini.free;
  end;
end;

Das Beispiel zum lesen, aus dem Tutorial von oben.

Delphi-Quellcode:

for i:=0 to max do 
begin 
 *for j:=0 to max do 
* begin 
*   steine[i,j].visible := Data.readBool(IntToStr(i)+'_'+IntToStr(j),'visible',True); 
*   steine[i,j].typ     := Data.readInteger(IntToStr(i)+'_'+IntToStr(j),'typ',0); 
* end; 
end;