Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#3

AW: Editfeld 3. Stelle auslesen

  Alt 13. Feb 2011, 11:57
if length(Edit1.Text) > 2 then Edit2.Text := Copy(Edit1.text,3,1); oder
if length(Edit1.Text) > 2 then Edit2.Text := Edit1.text[3];
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat