Foros Club Delphi - DDE/OLE/..Poner a prueba un programa

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - DDE/OLE/..Poner a prueba un programa (https://www.clubdelphi.com/foros/showthread.php?t=2402)

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.

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;

Con respecto al resto, me parece que estas complicando el tema, porqué no haces cambios sutiles para que tu aplicación, sin tener que usar tecnologías externas, inserte datos en forma repetitiva?

Saludos!

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 ;)