INI-Files für Sprachen

[M-O-D]

Du gibst jedem Button einen Tag, 1 bis Anzahl Buttons. Der Button Tag ist in einer Sektion in der Ini gespeichert zB. so:

[Captions]
1=OK
2=Hilfe
3=Abbruch

Jetzt nimmst Du ne for Schleife in ner Prozedur :

Delphi-Quellcode:

var
  I: Integer;
  Temp: TComponent;
begin

  ini := TIniFile.Create(Pfad);
try
  for I := ComponentCount - 1 downto 0 do
  begin
    Temp := Components[I];
    if Temp = TButton  then begin

      with Temp as TButton do
           Caption := ini.ReadString(SektionsName, ButtonTag,'0');

    end;
  end;
finally
    ini.Free;
end;

end;

Der IniPfad is ne Globale Variable und wird bei jedem Sprachwechsel geändert. So kannst Du alle Buttons beim Sprachwechsel umbenennen.