Fórum trocar letras #309842

19/01/2006

0

Delphi

Olá,
tenho num maskedit o valor 00:23, quanto for 00 quero trocar para 24.. como faço?
If COPY(mskHora.Text,1,2) = IntToStr(00) then
até aqui consegui.. só não sei como substitui...
Podem me ajudar?


Daia

Daia

Responder

Posts

19/01/2006

Edilcimar

temp1, temp2 : string;
temp := copy(maskedit1.text,1,2);
temp2 := copy(maskedit1.text,3,2);
if temp1 := ´00´ then
temp1 := ´24´;
maskedit1.text := temp1+temp2


Responder

Gostei + 0

19/01/2006

Daia

muito obrigada funcionou direitinho!!!!


Responder

Gostei + 0

19/01/2006

Edilcimar

estamos aí


Responder

Gostei + 0

19/01/2006

Emerson Nascimento

ou ainda:

maskedit1.text := stringreplace(maskedit1.text,´00:´,´24:´,[rfReplaceAll]);


Responder

Gostei + 0

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

Aceitar