trocar letras
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
Curtidas 0
Respostas
Edilcimar
19/01/2006
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
GOSTEI 0
Daia
19/01/2006
muito obrigada funcionou direitinho!!!!
GOSTEI 0
Edilcimar
19/01/2006
estamos aí
GOSTEI 0
Emerson Nascimento
19/01/2006
ou ainda:
maskedit1.text := stringreplace(maskedit1.text,´00:´,´24:´,[rfReplaceAll]);
maskedit1.text := stringreplace(maskedit1.text,´00:´,´24:´,[rfReplaceAll]);
GOSTEI 0