Hvordan søren gør jeg?

Et lille hurtigt eksempel:

procedure TForm1.Button1Click(Sender: TObject);
var
  streng: string;
begin
  streng := \'test\';
  showmessage(streng);
end;

Snowball

TStrings er en abstrakt klasse, beregnet til at nedarve fra. Et eksempel på en klasse som er nedarvet fra TStrings er TStringList som kan indeholde et \"uendeligt\" antal strenge.

...du kan ikke lave instanser af abstrakte klasser, og slippe afsted med det :)

hhmm...jeg tror vist jeg misforstod spørgsmålet !?

Snowball

Du skal gøre begge dele (mere eller mindre:

<SNIP>
var
  MyStrings: TStrings;
begin
  MyStrings := TStrings.Create;
  // Arbejd med din MyStrings
  MyStrings.Free;
end;
</SNIP>

Øhh som lrj siger så er TStrings abstract så du skulle i stedet TStringList, så eksemplet bliver:

<SNIP>
var
  MyStrings : TStringList;
begin
  MyStrings := TStringList.Create;
  // Arbejd med din MyStrings
  MyStrings.Free;
end;
</SNIP>

Hehe, pellelil - yearh - abstrakte klasser kan man brænde nallerne på :)

Jeg konstaterede bare at \"manden\" ikke havde fået et svar på spøgsmålet så jeg fløj i blækhuset uden at tænke mig om og uden at kigge nærmere på de andre svar. Meget at det man render og laver efterhånden blevet vane, jeg selv bruger altid TStringList og undrede mig ikke videre over at man ville bruge TStrings

Men så er det jo godt at du var vågen  ;-)

:o)

I forlængelse af pellelil\'s svar vil jeg lige tilføje at da både TStrings og TStringList arver fra TPersistens kan de assignes til hinanden...

Et eksempel :

var
  StringList : TStringList;
begin
  StringList := TStringList.Create;
  StringList.Add(\'Linje 1\');
  StringList.Add(\'Linje 2\');
  StringList.Add(\'Linje 3\');
  StringList.Add(\'Linje 4\');
  Memo1.Lines.Assign(StringList);
  StringList.free;
end;


Jens B

Den syntax du foreslår :

var
  MyStrings: TStrings;

også ..

MyStrings.Create;

Det var noget man gjorde i Turbo Pascal.  Jeg kan ikke huske om det også var sådan i Turbo Pascal for Windows, men mon ikke ...

Jens B

Tak for hjælpen... så kører det lidt for mig igen

Øv - jeg var da også med til at lave svaret :)

lrj>> Ja det var du godt nok, men desværre var det ikke noget jeg kunne bruge til det helt store. Som sagt er det ret lang tid siden jeg sidst har programmeret i Delphi, så det var nødvendigt med et eksempel.

Jowjow, så ved man da det :)