[delphi] left e right di una stringa

[123delphi321]

Ciao a tutti,

mi sapete dire qual'e' la funzione che mi restituisce la parte left e la parte right di una stringa?

io ho trovato e provato questo codice.....ma non riesco a farlo funzionare.

var
  source, target : AnsiString;
begin
  source := '123456789';
  target := AnsiLeftStr(source, 3);

  ShowMessage('Source = '+source);
  ShowMessage('Target = '+target);
end;

io vorrei ottenere una stringa con gli ultimi 5 caratteri a destra,...quindi: target = '56789'


grazie

[alka]

A rigor di logica, se per estrarre caratteri dalla parte sinistra di una stringa si usa AnsiLeftStr, direi che per la parte destra si dovrebbe usare AnsiRightStr.

Ad ogni modo, si tratta di funzioni che sono state introdotte solamente per facilitare il passaggio degli sviluppatori VB a Delphi...in realtà, la funzione Copy in congiunzione con Length è sufficiente per fare tutto.

Non per niente, ti basterà osservare che la funzione AnsiRightStr si rifà alla RightStr che utilizza internamente la funzione Copy di Delphi.

function RightStr(const AText: AnsiString; const ACount: Integer): AnsiString;
begin
  Result := Copy(WideString(AText), Length(WideString(AText)) + 1 - ACount, ACount);
end;

Ciao!