trocar letras
19/01/2006
0
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?
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
Curtir tópico
+ 0
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
temp := copy(maskedit1.text,1,2);
temp2 := copy(maskedit1.text,3,2);
if temp1 := ´00´ then
temp1 := ´24´;
maskedit1.text := temp1+temp2
Responder
19/01/2006
Emerson Nascimento
ou ainda:
maskedit1.text := stringreplace(maskedit1.text,´00:´,´24:´,[rfReplaceAll]);
maskedit1.text := stringreplace(maskedit1.text,´00:´,´24:´,[rfReplaceAll]);
Responder
Clique aqui para fazer login e interagir na Comunidade :)