Dúvida Cruel! :(

21/02/2003

0

Estou usando delphi6 com interbase 6, e quando vou alterar dados da tabela em algum dbedit eu tenho que apagar os espaços em branco no final do campo. Como fazer que estes espaços não sejam gravados? ou por que eles estão lá.
obs: utilizo campos char(9)


Anonymous

Anonymous

Responder

Posts

21/02/2003

Vinibarr

altere o tipo do campo para varchar(9); neste caso, ele vai ocupar somente o espaço necessário, e não haverá mais espaços em branco.


Responder

21/02/2003

Dor_poa

Tenta usar o comando trim... se ele nao funcionar, o que eu duvido... usa esta função..

{ Uma função que tira os espaços no início e no final de uma string }

Function Trim(J:String):String; Export;
Begin
While J[Length(J)]=#32 do Dec(J[0]);
If Length(J)>1 then
While (J[1]=´ ´) do
Begin
Delete(J,1,1);
If Length(J)<=1 then J:=´´;
end;
Result:=J;
end;
Exports { Torna visivel para os programas }
Trim;
Begin
End.


Responder

24/02/2003

Duque

vc pode fazer o seguinte ...

coloque Trim antes do nome do campo ao inserir ...

Trim(Edit.text);


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar