|
| Erstat et navn med StringReplace Fra : MonieJacobsen | Vist : 712 gange 50 point Dato : 30-03-04 10:01 |
|
Nedstående kode kan jeg ikke få til, at fungerer.
Men når jeg indskriver et navn og vil "replay" erstatte <First Name> bliver det indskrevet navn ikke vist.
Kan du se hvad der gøres forkert?
Indskrivning:
procedure TForm1.LMDButton3Click(Sender: TObject);
var
Default : string;
name : string;
begin
name := IndskrivSaetning('Indskriv første navn:',Default); // Indskriv et navn der skal erstatte <First Name>
end;
Erstat:
procedure TForm1.replayClick(Sender: TObject);
var
name,sourcetext : string;
begin
Memo1.Text:= StringReplace(Memo1.Text, '<First Name>', name, [rfReplaceAll]); //Indsæt "name" i stedet for <First Name>
end;
Med venlig hilsen
Monie Jacobsen
| |
|
Tak for svaret molokyle.
Jeg havde helt overset dette det virker bare nu.. Tak
| |
| Du har følgende muligheder | |
|
Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.
Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
| |
|
|