Delphi-PRAXiS - Ergebnis der Suchanfrage

Ergebnis der Suchanfrage

Datum des Suchindex: Heute, 23:17

Parameter dieser Suchanfrage:

Suche in Thema: Tedit, vorhandenen Text überchreiben
Suche alle Beiträge, die von "teebee" geschrieben wurden

• Suchmethode: "Suche nach allen Begriffen"
• Nach Datum (firstpost) sortiert
• Zeige Treffer als Beiträge

Zeige 1 von insges. 1 Treffern
Suche benötigte 0.003s

Es liegen Ergebnisse in folgenden Bereichen vor:

Forum: Programmieren allgemein
Re: Tedit, vorhandenen Text überchreiben

by teebee, 13. Feb 2004
Einen Overwrite-Modus gibt es bei einem Edit-Control IMHO nicht. Folgendes funktioniert allerdings: (Hoffe, ich habe Dein Problem richtig verstanden...)
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
Var temp: String;
sel: Integer;
begin
If (Ord(Key)>31) And (Edit1.SelLength=0) Then Begin
temp := Edit1.Text;
sel := Edit1.SelStart;
Delete(temp,sel+1,1);
...

URL zu dieser Suchanfrage:

https://www.delphipraxis.net/dp_search.php?do=usersearch&search_username=teebee&search_exact_username=1&search_sortby=dateline&search_resulttype=post&search_matchmode=0&searchthreadid=15850

Ergebnis der Suchanfrage

Parameter dieser Suchanfrage:

Es liegen Ergebnisse in folgenden Bereichen vor:

Re: Tedit, vorhandenen Text überchreiben

URL zu dieser Suchanfrage: