Array
(
)

trocar letras

Daia
   - 19 jan 2006

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?


Edilcimar
   - 19 jan 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


Daia
   - 19 jan 2006

muito obrigada funcionou direitinho!!!!


Edilcimar
   - 19 jan 2006

estamos aí


Emerson
   - 19 jan 2006

ou ainda:

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