Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi array mir Textdatei füllen (https://www.delphipraxis.net/7509-array-mir-textdatei-fuellen.html)

Privateer3000 14. Aug 2003 12:41


array mir Textdatei füllen
 
Hiho,

Lässt sich ein array (String)
mit Hilfe von eine zB. Ini-datei füllen?
In der Ini könnte zB. Schlüssel 1..50 mit deren Werte in ein array packen , so dass man jederzeit beim Erstellen von Labels/Edits mit Hilfe des Array einen Text/Caption zuordnen kann.
Ich hoffe ich hab mich nicht zu umständlich ausgedrückt :)

Billa 14. Aug 2003 12:46

Re: array mir Textdatei füllen
 
Hallo Privateer,

guckst Du hier:

http://www.tutorials.delphi-source.de/ini/

Gruß
Billa :wink:

oki 14. Aug 2003 12:49

Re: array mir Textdatei füllen
 
Warum so kompliziert? Eine Stringliste tuts doch auch.

Delphi-Quellcode:
procedure ReadSectionValues(const Section: string; Strings: TStrings); override;
Gruß oki

Privateer3000 14. Aug 2003 13:30

Re: array mir Textdatei füllen
 
oki..wie geht das konkret?
Bitte mal ein ausführlicheres Beispiel...

Marco Haffner 14. Aug 2003 13:46

Re: array mir Textdatei füllen
 
Delphi-Quellcode:
function ReadIniValue(const IniFileName: string; const Index: integer; const ValueName: string): string;
var
  Sl: TStrings;
begin
  Sl := TSTrings.Create;
  with Sl do
  try
    LoadFromFileName(IniFileName);
   
    // Gibt den Namen an Position x zurück
    Result := Names[Index];

    {oder}

    // Lieftert den Wert an Position x
    Result := ValueFromIndex[Index];

    {oder}

    // Gibt den Wert der Eigenschaft x zurück
    Result := Values[ValueName];

  finally
    Free;
  end;
end;
Welchen der 3 möglichkeiten Du verwendst bleibt Dir überlassen.
Kannst dann const Index: integer oder const ValueName: string weglassen, jenachdem welchen Du nicht benötigst.

oki 14. Aug 2003 14:11

Re: array mir Textdatei füllen
 
Hi,

warum benutzt eigentlich keiner die OH? Ist doch keine Schande.

Hier der Entsprechende Beitrag aus der OH-Beispiel
Zitat:

Das folgende Beispiel liest Informationen aus der Datei WIN.INI in drei Listenfelder eines Formulars.

uses IniFiles;

procedure TForm1.FormActivate(Sender: TObject);
var
AppIni: TIniFile;
begin
AppIni := TIniFile.Create('WIN.INI');
AppIni.ReadSections(ListBox1.Items);
AppIni.ReadSection('Ports',Listbox2.Items);
AppIni.ReadSectionValues('Ports',ListBox3.Items);
AppIni.Free;
end;
Gruß oki

Marco Haffner 14. Aug 2003 14:24

Re: array mir Textdatei füllen
 
Zitat:

Zitat von oki
warum benutzt eigentlich keiner die OH? Ist doch keine Schande.

:wall: Selbst die wäre eigentlich nicht nötig gewesen.
Aber vielleicht hat die Ini-Datei ja keine Sections.

oki 14. Aug 2003 14:31

Re: array mir Textdatei füllen
 
Zitat:

Zitat von Marco Haffner
Aber vielleicht hat die Ini-Datei ja keine Sections.

Ja, wenn keiner die Sections benutzt, dann frag ich mich warum er TIniFile benutzt?

Ich kauf mir ja auch ein Auto zum fahren und nicht um nur einen Kühlschrank draus zu machen. Dann kauf ich mir ja einen Kühlschrank und kein Auto. :dancer:

Gruß oki

Privateer3000 14. Aug 2003 15:15

Re: array mir Textdatei füllen
 
Sorry, aber ich habe durchaus in der OH nachgesehen.
Aber vielleicht an den falschen Stellen.
Denn manchmal findet man in der OH die gesuchten Hilfestellungen da wo ich sie nicht vermutet hätte
.Also Entschuldigung wenn so etwas passiert.


Alle Zeitangaben in WEZ +1. Es ist jetzt 18:08 Uhr.

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