Form Editor - Textdatei inTComboBox einlesen

Lothar

Hallo zusammen,

ich stehe gerade bei dem Form Editor auf dem Schlauch.

Ich versuche den Inhalt einer *.txt Datei als Liste in eine TComboBox zu laden. Die Textdatei wird vorher im CC in den "DOWNLOAD_PATH" heruntergeladen, der auch vorher definiert wurde.

Die Textdatei hat die folgende Form:

Eintrag_1

Eintrag _2

Eintrag _3

Eintrag _4

Mein bisheriger Code im Form Editor lautet:

Code

procedure TCustomACMPWindow(Sender: TObject);   
var
  ltemp : TStringList;                                                             
  i : Interger;                                                                
begin 
  ltemp := TStringList.Create;      
  ltemp.LoadFromFile(GetVarContent('DOWNLOAD_PATH') + 'list.txt');   
  for i := 0 to (ltemp.count - 1) do
    NamederTComboBoxStrings.items.add(ltemp.strings[i]);  
end;

Wobei NamederTComboBoxStrings natürlich durch das Attribut "Name" der "TComboBox" ersetzt wird.

gesamter Code

{$FORM TCustomACMPWindow, FormUnit.sfm}

uses

Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls,

StdCtrls, SysUtils, Buttons, Menus;

procedure OkButtonClick(Sender: TObject);

begin

CloseForm(0);

end;

procedure CancelButtonClick(Sender: TObject);

begin

CloseForm(1);

end;

procedure TCustomACMPWindow(Sender: TObject);

var

ltemp : TStringList;

i : Interger;

begin

ltemp := TStringList.Create;

ltemp.LoadFromFile(GetVarContent('DOWNLOAD_PATH') + 'list.txt');

for i := 0 to (ltemp.count - 1) do

"TComboBoxStrings Name".items.add(ltemp.strings[i]);

end;

Wahrscheinlich nur ein Denkfehler meinerseits, daher bin ich für eure Hilfe dankbar.

Viele Grüße

Lothar

Jetzt mitmachen!