Como capturar só alguns caracteres d um registro

Delphi

08/12/2003

Olá pessoal em minha tabela possuo os seguintes registros
PEDIDO |COD_CLI | TOTAL |
000005640 | 000126 | 200,00 |
000005641 | 001268 | 405,00 |

Preciso copiar para uma variavel Pedido tipo string o seguinte:
(0000056) apenas os 7 primeiros caracteres

Tabela .dbf
estou usando TTable e delphi 6

Muito Obrigado


Infohelp

Infohelp

Curtidas 0

Respostas

Rafael Heise

Rafael Heise

08/12/2003

Você pode usar Copy(CodigoEmString,1,7) ou então SubString do paradox.
SELECT SUBSTRING(PEDIDO FROM 1 FOR 7) FROM TABELA


GOSTEI 0
Infohelp

Infohelp

08/12/2003

olá, obrigado pela dica mas será que poderia me passar um exemplo Copy(CodigoEmString,1,7) com o click q um botºao


GOSTEI 0
Rafael Heise

Rafael Heise

08/12/2003

function Retorna7Caracteres(aTexto: string): string;
begin
  Result := Copy(aTexto,1,7);
end;


pronto. Essa função retorna os 7 primeiros caracteres do texto que você passar
Passe dai o valor do campo/registro que você quer e beleza
valeu!


GOSTEI 0
POSTAR