aus FieldByName das letzte Zeichen kopieren

[Sir Rufo]

Zitat von Alterauge:

mysqlbosgrid.FieldByName('Status').Text := Copy(mysqlbosmon.FieldByName('Address').Text,8, Length(mysqlbosmon.FieldByName('Address').Text));

Das tut ja richtig weh ...

Wenn du weißt, dass sich mindestens 8 Zeichen darin befinden, warum dann nicht so

Delphi-Quellcode:

mysqlbosgrid.FieldByName('Status').Text := Copy( mysqlbosmon.FieldByName('Address').Text, 8, 1 );

Wenn du weißt, dass sich mindestens/maximal 8 Zeichen darin befinden, warum dann nicht sogar so

Delphi-Quellcode:

mysqlbosgrid.FieldByName('Status').Text := Copy( mysqlbosmon.FieldByName('Address').Text, 8 );

Wenn du tatsächlich das letzte Zeichen haben möchtest - unabhängig wie lang der String ist, dann so

Delphi-Quellcode:

var
  LText : string;

LText := mysqlbosmon.FieldByName('Address').Text;
mysqlbosgrid.FieldByName('Status').Text := Copy( LText, Length( LText ) );