Bom dia a todos!
Fiz a seguinte rotina no delphi :
for i := 0 to MemoAndamento.Lines.Count - 1 do
begin
Linha := MemoAndamento.Lines[i];
DataAux := Trim(copy(Linha, 1, 10));
HoraAux := Trim(copy(Linha,13,6));
HoraComp :=
Se voce usa Delphi 6 ou superior, de uma olhada nas funcoes da unit
DateUtils (IncMinute, IncHour, etc).;
Leandro
- Original Message -
From: Patricia Santana [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, December 08, 2005 8:25 AM
Subject: [delphi-br] Rotina
: Thursday, December 08, 2005 8:25 AM
Subject: [delphi-br] Rotina incremento
Bom dia a todos!
Fiz a seguinte rotina no delphi :
for i := 0 to MemoAndamento.Lines.Count - 1 do
begin
Linha := MemoAndamento.Lines[i];
DataAux := Trim(copy(Linha, 1, 10));
HoraAux := Trim(copy(Linha,13,6));
HoraComp
3 matches
Mail list logo