Hallo,
Delphi-Quellcode:
procedure TFormular.SchalterClick(Sender: TObject);
var
NeueZeichenfolge : string;
InordnungSchalterGedrueckt : Boolean;
begin
NeueZeichenfolge := 'Hier können Sie was eingeben...';
AnzeigeVonText.Caption := NeueZeichenfolge;
InordnungSchalterGedrueckt := InputQuery('Eingabeschachtel', 'Bitte hier Eingabe vornehmen:', NeueZeichenfolge);
if InordnungSchalterGedrueckt then { NeueZeichenfolge enthält neue Eingabe }
AnzeigeVonText.Caption := 'Die neue Zeichenfolge ist ''' + NeueZeichenfolge + '''';
end;
Deutscher geht's nicht, da die Programmiersprache nunmal sehr starkt an das Englische angelehnt ist.
Stephan