FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
DDE/OLE/..Poner a prueba un programa
Hola a todos. He hecho una aplicacion y me gustaría ponerla a prueba metiendole un gran volumen de datos.
Se trata de una aplicacion q usa una base de datos Paradox en red. Para empezar, no se muy bien qué es lo q hacer para probarla, mi idea es meterle dsd muchos equipos muchos registros a la vez, para ver en qué momento falla. La cosa es q no sé si usar un programa que le meta constantemente registros a traves de componentes DDE.. o hacerlo manulamente(si no queda más remedio), el tema de objetos OLE no me parece muy apropiada(tmpoco lo he usado mucho). De todas formas no sé como enviar datos dsd un ClienteDDE a un servidor DDE (al contrario si funciona). Llamo al método Pokedata de la siguiente manera Código:
var cad: pchar; begin getmem(cad,sizeof(char)*Length(ed.text)+1); if DdeClientConv1.PokeData(dnombre.DdeItem, strpcopy(cad,ed.Text)) then showmessage('pokebien'); freemem(cad,sizeof(char)*Length(ed.text)+1);end; Alguna sugerencia?? Gracias. Última edición por Muten fecha: 22-07-2003 a las 12:56:52. |
#2
|
||||
|
||||
Como sugerencia te puedo decir que agregues un try..finally a tu código.
Código:
var cad: PChar; begin GetMem(cad, SizeOf(char)*Length(ed.text)+1); Try if DdeClientConv1.PokeData(dnombre.DdeItem, strpcopy(cad,ed.Text)) then ShowMessage('pokebien'); finally FreeMem(cad); end; end; Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. Última edición por delphi.com.ar fecha: 22-07-2003 a las 19:15:49. |
#3
|
|||
|
|||
Pues tienes razón, con lo de no complicarme... es q tantos dias programando la aplicación ma dejao algo 'saturado'. D todas formas tb me interesaba aprender a manejar lo del DDE, gracias por tu sugerencia
|
|
|
|