Wie lösche ich ein Zeichen im Editfeld?

[chris_82]

Wie lösche ich das Zeichen mit dem Index i im Editfeld?

ich weiß ist sicher nicht schwer, finde die funktion aber trotzdem nicht :(

[trifid]

Hallo,

Delphi-Quellcode:

   var s : String;
   var i : Integer; // i-te Zeichen
begin
   s := Edit1.Text;

   Delete (s, i, Length (s));

   Edit1.Text := s;
end;

[trifid]

Hallo,

sorry
Delete (s, i, 1);

[Mirilin]

:hi:

Eine, aber wohl nicht die beste Lösung :wink:

Delphi-Quellcode:

  Edit.SelStart  := i;
  Edit.SelLength := 1;
  Edit.SelText   := '';

eine andere

Delphi-Quellcode:

Delete(String,i,1)

mfg Tobias

[trifid]

Hallo @Mirilin,

gleiche Zeit - gleiches gedacht :-D