Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 22-07-2003
Muten Muten is offline
Miembro
 
Registrado: jul 2003
Posts: 33
Poder: 0
Muten Va por buen camino
Question 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.
Responder Con Cita
  #2  
Antiguo 22-07-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
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!
__________________
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.
Responder Con Cita
  #3  
Antiguo 22-07-2003
Muten Muten is offline
Miembro
 
Registrado: jul 2003
Posts: 33
Poder: 0
Muten Va por buen camino
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
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 11:33:55.


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
Copyright 1996-2007 Club Delphi