Link fra MyBas til Memo - Brevfletning.

Hej

Vil du hjælpe mig med, at få Link fra MyBas til Memo til at virke.

Det liner meget brevfletning!

Døren åbner sig meget forsigtigt ind til børneværelses.
Ind kommer <First Name> og <Mother Name> for at sige godnat.

Men det lykkes ikke rigtig for mig, jeg er nok så ivrig for,
at få det til, at virke, at det går helt galt!

Beskrivelse af forløbet.
1: Først skrives der navne m.v. ind i MyBase.
2: Så Lodes historie ind i Form7.Memo1.Lines.Add(InString);
3: Og ønsker med en knap, at de data'er der i databasen
erstatter '<nickname>'

Min procedure for indsætning:

procedure TForm7.Button2Click(Sender: TObject);
var
FinalText : String;
Field1 : String;
Field2 : String;
Field3 : String;
Field4 : String;
begin
Form6.BogDb.First; // Gå til den første post.
while not Form6.BogDb.EOF do // loope indtil der ikke er flere
begin
Field1 := Form6.BogDb.FieldByName('First Name').AsString;
Field2 := Form6.BogDb.FieldByName('Last Name').AsString;
Field3 := Form6.BogDb.FieldByName('Nick Name').AsString;
Field4 := Form6.BogDb.FieldByName('Mother Name').AsString;

FinalText := Format(Memo1.Text, [Field1, Field2, Field3,
Field4]);

// Form7.Memo1.Text:=(Field1 + ' '+ Field2 + Field3 +
Field4);

stringreplace(form7.memo1.lines.text, '<First Name>', '
Field1', [rfReplaceall]);

stringreplace(form7.memo1.lines.text, '<mothers name>', '
Field2', [rfReplaceall]);

Det lykkes ikke rigtig for mig, at få skifte teksten ud på
Form7.Memo1? Hvor historien er load'et ind.
Vil du være behjælpelig tilrettelse af proceduren?

Form6.BogDb.Next;
end;
end;

Håber meget jeg forklare mig godt nok!

På forhånden rigtige mange tak.

Monie jacobsen
E-mail: energy@sunwind.dk