Elegir Posicion de una cadena String y eliminar caracter en una posicion deseada

[BuRtOn]

jejeje, es que en la bd esta almacenado como money $, y lo paso a string, por que simplemente necesito imprimir el valor. jeje, Gracias amigos, como siempre me sacan de apuros.

[*Caro*]

Hola de nuevo, el Copy no va en el StringReplace, tal como lo tienes esta bien.

Así directo si quieres mostrar en un Label:

Código Delphi [-]
 Cadena := Query.FieldByName('CampoPrecio').AsString;
 Label1.Caption := StringReplace(Cadena, '$', '', [rfReplaceAll]);

o si usas Copy:

Código Delphi [-]
 Label1.Caption := Copy(Cadena, 2, Length(Cadena));

[rgstuamigo]

Y por que no hacer:

Código Delphi [-]
Cadena[1]:=#32;
Label1.Caption:=TrimLeft(Cadena);

Saludos.....

[rgstuamigo]

Tambien se puede hacer:

Código Delphi [-]
Delete(Cadena,1,1);//elimina el primer caracter ascii de cadena
Label1.Caption:=Cadena;

[[Al González]]

Se me ocurre esta otra:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Caption := PChar (@Edit1.Text [2]);
end;