Subject: Re: [delphi-br] Data Inválida
fiz uma funcao pra vc aqui esta
function Fdata(const s: string): boolean;
begin
try
StrtoDate(S);
Result := true;
except
Result := false;
end;
end;
coloque no seu codigo o seguinte
if Fdata(Copy(Tabela2Campotexto.Value,15,10
(Tabela2Campotexto.Value,15,10));
- Original Message -
From: Trama Paulista .:sites .:sistemas [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, September 09, 2004 2:28 PM
Subject: [delphi-br] Data Inválida
Estou fazendo uma leitura de um trecho de um campo de uma tabela para m
campo de
2 matches
Mail list logo