Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   valor en blanco de IWEdit1 despues de utilizar AsyncClick (https://www.clubdelphi.com/foros/showthread.php?t=69052)

burgosrodas 23-07-2010 01:23:39

valor en blanco de IWEdit1 despues de utilizar AsyncClick
 
hola ya he rebotado en varios hilos y no he podido encontrar la solución

estoy tratando de optimizar tiempo en mi aplicación StandAlone de intraweb 10
y empecé a implementar un poco de Ajax con los eventos asincrónicos que me ofrece Delphi
hice un teclado numérico con IWButtons y por medio de ScriptEvents adicione algo de codigo como IWEdit.value+='1'; en el evento onClick de cada botón,
alimentando asi un IWEdit, el problema radica que cuando voy a hacer un IWButtonAsyncClick para validar el IWEdit contra la base de datos (paradox) aparece que IWEdit.Text es vacio
entiendo que cuando el script me altera el valor del Edit, desde pascal no se notifica este cambio, no logro entender como refresco o actualizo para que desde Delphi logre obtener el nuevo valor asignado por JavaScript al Edit.

podria desde Delphi hacer algo como

Código Delphi [-]
procedure TForm.IWButton1Click(Sender: TObject);
begin
        IWEdit1.Text:=IWEdit1.Text+'1';
end;

pero es mucho mas lento que hacerlo con javascript, pues este me genera otro html y es lo que quiero evitar, pues tendria que redibujar los demas componentes del html por completo

tambien realicé algo con Ajax

Código Delphi [-]

procedure TForm.IWButton1AsyncClick(Sender: TObject;EventParams: TStringList);
begin
           IWEdit1.Text:=IWEdit1.Text+(Sender as TIWButton).Caption;
end;

pero también se nota el retardo (aunque no entiendo muy bien porque)
solo he tenido resultados rápidos con JavaScript, pues este se ejecuta en el cliente
espero que se haya entendido mi problema

alguien me puede colaborar con esto?
o tiene una solución alterna?
gracias

--
Pereira/Colombia


La franja horaria es GMT +2. Ahora son las 19:13:47.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi