Memo's Tstring

Alt hvad der skrives i Memo'en bliver gemt i memoens TStrings.

Hvis du vil indsætte noget tekst, som du ved du vil bruge hvergang, kan du bruge memo.lines.add(<streng>);

Eksembel:

procedure TForm1.Button1Click(Sender: TObject);
begin
  memo1.Lines.Add('Denne linie vil blive tilføjet, når der trykkes på knappen');
end;

Du kan jo også i ObjektInspektoren trykke på Lines og indsætte de strenge du vil have i memoen, ved opstart...

Var det sådan noget du tænkte på???
Mvh
Retep.

Den tekst du indsætter i memoen under kørsel (via memo1.lines.add(tekst); kan du IKKE efterfølgende gemme i den property for memoen der hedder Lines.

Som retep skriver kan du i design oprette noget tekst i Lines-propertyen og det vil så fremgå af memoen hver gang programmet starter.

Det der indsættes i memoen under kørsel SKAL gemmes et eller andet sted. Ellers forsvinder det når du lukker programmet.

Du kan gemme det i en fil med memo1.lines.savetofile(filnavn) og indlæse det igen når programmet starter med memo1.lines.loadfromfile(filnavn), eller du kan gemme det i en database, f.eks. en paradox, i et såkaldt Blob-felt. F.eks. med table1tekst.value := memo1.text;

Memoen har en property der hedder text der indeholder alle linierne adskilt af CR og LF, i det omfang de er added eller man ved indtastning har trykket return. Ved indtastning, hvor memoens Wrap funktion skriver videre på næste linie når man ikke trykker return, opfattes ikke som flere linier.

Du kan så gemme (og indlæse data i) memoens indhold i en tekststreng med Memo1.text := tekststreng; eller Tekststreng := memo1.text;

Men du skal stadig gemme tekststreng et eller andet sted på en disk (hard- eller floppy) inden du afslutter programmet.

sjensen