Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi ValueListEditor allg. Frage (https://www.delphipraxis.net/12494-valuelisteditor-allg-frage.html)

TheMiller 30. Nov 2003 21:33

Re: ValueListEditor allg. Frage
 
Ich habe es jetzt folgendermaßen gelöst...

Delphi-Quellcode:
procedure TForm1.ValueListEditor1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
  var ini:Tinifile;
begin
ini:=Tinifile.Create(ExtractFilePath(ParamStr(0))+'archiv.ini');
try
Memo1.Lines.Clear;
Label8.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'Name',Text);
Label9.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'CDs',Text);
Label10.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'Format',Text);
Label11.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'TonFormat',Text);
Label12.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'BildQualitaet',Text);
Label13.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'Sprachen',Text);
Label14.Caption:=ini.ReadString(ValueListEditor1.Strings.Names[ValueListEditor1.row-1],'Untertitel',Text);
finally
ini.free;
end;
end;
Ja, um was geht es? Genau, ein Programm zum filme archivieren. Werde es auch hier freigeben. wenn ihr mir helfen wollt. Immer gerne ;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:39 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz