Mal ein kurzes Beispiel für die ersten Schritte mit Strings und EditFeldern:

[code:1]
var EinText: string; //Variable für Inhalt (Text) von edtEingabe
AusText: string; //Variable für Inhalt (Text) von edtAusgabe
VerglBuchst: string; //Variable für Vergleichsbuchstabe
k: integer; //Variable für die Position des Vergleichsbuchstabens (=Austauschbuchstabe)
laenge: integer; //Variable für die Länge des eingegebenen Textes
//Vereinbarungsteil-Ende

begin //Anfang des Ausführungsteils
EinText:=edtEingabe.Text; //Wertzuweisung Edit-Feld-Variable
AusText:=EinText; //Wertzuweisung zur Vorbereitung der Ausgabe
laenge:=length(EinText); //Feststellung der Länge des eingegebenen Textes
VerglBuchst:=edtBuchstabe.Text; //Wertzuweisung des Vergleichsbuchstabens aus dem Edit-Feld
for k:=1 to laenge do //Wiederholung-Anfang (vorausgehende Bedingungsprüfung)
if EinText[k]<>VerglBuchst then //Entscheidung (aufgrund Bedingungsprüfung)
AusText[k]:='*'; //(bedingte) Ausführung ; Wiederholung-Ende
edtAusgabe.Text:=AusText; //Wertzuweisung in Edit-Feld-Ausgabe
end; //Ende des Ausführungsteils

[/code:1]