Foros Club Delphi - OOP

Liberaci�n de un Form No Modal

vejerf — Mon, 06 Sep 2010 17:08:44 GMT

Buenas,

Por unos motivos he cre�do conveniente en mi aplicaci�n crear unos cuadros de di�logos no modales, es decir, dar�n avisos al usuario pero no detendr�n la ejecuci�n.

Debido a que no se detiene la ejecuci�n no sab�a en qu� momento deber�a de liberar la memoria.

Yo creo el objeto as�:

C�digo Delphi [-]with TDialogoForm.Create(nil) do
  begin
    ...
    Show;
  end;

Seg�n he le�do la forma correcta de liberar la memoria para un objeto as� es en el evento OnClose de la siguiente forma:

C�digo Delphi [-]procedure TDialogoForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;
end;

�Es esto correcto o ser�a m�s correcto un FreeAndNil? �Otra forma m�s eficiente y que no de problemas?

Saludos!

Archivo No encontrado

janexa — Thu, 02 Sep 2010 22:29:08 GMT

lo que pasa es que instale delphi 7 en wondows seven y aahora ejecuto mi aplicacion Archivo No encontrado

exceptionLog.dcu

que puedo hacer????

Mostrar DBGrid resultado procedimiento SQL

lacovera — Thu, 02 Sep 2010 07:28:22 GMT

Hola a todos!
Estoy intentando una cosilla pero no le saco punta...os explico:

Tengo un proc almacenado que me devuelve (muestra, no guarda en tabla) una serie de datos, mi duda es: como puedo mostrarlos en un dbgrid despu�s de llamar desde Delphi a ejecutarlo?

Muchas gracias!

como aplicar propiedades en un memo ?

gaston260 — Thu, 02 Sep 2010 00:33:42 GMT

Hola me gustaria poder aplicar las propiedades de font en un memo , me gustaria poder aplicar en fuente : pipominu , Estilo de fuente : Negrita cursiva y el tama�o , tambien efecto y alfabeto pero no se como hacerlo ! .

Busqueda usando un DBLookupComboBox

liito16 — Wed, 01 Sep 2010 16:18:02 GMT

Hola gentes, bueno tengo un problema en como realizar una busqueda.

El problema es como se realiza.
Lo que quiero hacer es que cuando selecciones una opcion del DBLookupComboBox, en el grid aparesca los resultados, y cuando lo deje en blanco esten todos los registros.

estoy usando un modulo de datos donde tengo los dataset, query. y tngo el formulario clientes donde tngo el datasource, clientedataset, provider. qe es para conectar el DBLookupComboBox.

nosotros damos de alta localidades y estas cuando vas a dar de alta un cliente aparece el campo localidad que atraves del DBLookupComboBox seleccionas cual queres.
la tabla clientes tiene un inner join con tabla localidades.

que es lo q tendria qe hacer?. que pongo en el qryclientes, y en que evento de DBLookupComboBox tngo que hacerlo muchas gracias vi un hilo que decia de como se realizaba la busqueda pero no entendi , estoy usando delphi 7 y ems interbase/firbird.

Desde ya muchas gracias espero que me entiendan

problema en for

julyus — Tue, 31 Aug 2010 16:17:02 GMT

no se que es este tipo de error ?? este codigo me produce el siguiente error e2081 FOR-loop variable i count :confused::confused::confused:

C�digo Delphi [-]  for iCount := 0 to Length(aEventCode) - 1 do
        begin
          if aEventCode[iCount] = 1 then
          begin

            inc(iMessageId);
          end;
        end;

�Con qu� Delphi trabajar?

ElDuc — Tue, 31 Aug 2010 07:19:42 GMT

Buenos d�as Se�ores,

Hace a�os que trabajo con Delphi 7 Interprise y JfControls.

Ahora tengo un encargo que para mi es importante porque, si quedo bien, puedo tener m�s trabajo.

Se trata de una aplicaci�n Cliente / Servidor para bastantes usuarios y no quisiera que todos los puestos de trabao accedieran directamente a ellas, es decir, que en el servidor haya un programa con el que se comunican los puestos de trabajo y �ste con la DB.

Tal como he dicho adem�s de trabajar con D7, trabajo con la librer�a de componentes JfControls, lo que me permite mejorar la apariencia de mis trabajos.

Como base de datos trabajo con Access y SQL Server, pero el primero es muy limitado (por ejemplo no tine transacciones anidadas) y el segundo es muy caro (si el cliente no lo tiene).

En definitiva:

Yo quisiera trabajar con la versi�n de delphi m�s adecuada
1. 7 / 2009 / 2010 / ...
2. Architect / Interprise / Profesional
Creo que JfControls s�lo cubre hasta la 2009, si fuera la 2010, posiblemente existe alguna librer�a semejante. La ventaja de JfControls es que son espa�oles y adem�s de que la ayuda est� en castellano, puedes hablar con ellos.
�Con qu� base de datos trabajar?, He pensado que sea gratuita para que mi cliente no tenga que desembolsar por ese concepto y por el momento tengo dudas entre:
1. MySql
2. FireBird
3. Postgre SQL

:) Disculpad la extensi�n del escrito, pero tengo muchas dudas por el cambio que pretendo hacer.

Espero que este hilo pueda servir para debatir todas estas cuestiones y que sirva a otras personas.

Gracias de antemano.

como lanzar un tactionlist desde el c�digo

r1d2m3 — Mon, 30 Aug 2010 02:45:48 GMT

Hola a todos, explicar� un poco mejor el t�tulo con la siguiente pregunta: �existe alguna forma de lanzar una acci�n creada con un tactionlist desde una l�nea de c�digo?. Hasta donde he usado las tactionlist, las mismas deb�an estar asociadas a la propiedad Action de un men�, bot�n, etc, etc, cualquier componente que tuviera disponible la propiedad Action. Mi problema es que, bajo ciertas circunstancias, debo lanzar una de estas acciones directamente desde el c�digo y no se como se resuelve esto.

Desde ya, gracias y saludos.

Campo Fecha vacio en SQL

oscarac — Sun, 29 Aug 2010 08:36:26 GMT

buenos dias
una consulta mas
tengo una tabla Sql donde se registra una fecha de vencimiento que no necesariamente debe tener un valor
cuando ejecuto el query para jalar un determinado grupo de datos, entre ellos dicho campo me aparece algo como esto cuando lo muestro en el reporte

Cita:

01 001-000287 01/08/2010 31/12/1899
01 001-000288 02/08/2010 31/12/1899
01 001-000289 02/08/2010 31/12/1899
01 001-000290 04/08/2010 10/08/2010
01 001-000291 06/08/2010 31/12/1899
01 001-000292 07/08/2010 31/12/1899

como hago para que ese campo no tome el valor de 31/12/1899 y aparezca un campo vacio

se agradece

Duda que me atormenta

oscarac — Sun, 29 Aug 2010 07:19:50 GMT

saludos

tengo un problema y no se como solucionarlo, a ver si me pueden echar una mano, tengo algunas ideas sobre el tema, a ver si me pueden ayudar

tengo una tabla donde existen 2 campos (n_IMP y u_IMP) entiendase moneda nacional y moneda extranjera
en la mayoria de reportes tengo la opcion de escoger la moneda a mostrar
entonces la pregunta es...

como hago el query para que de acuerdo a un parametro o quiza otro artificio me muestre la moneda que quiero y lo que es peor un, mostrarlo en un reporte (quiza usando Case combinado con If)

despues he pensado en jalar las 2 monedas y posteriormente o quiza en el mismo query asignarla a un campo neutral o intermediario que me identifique el "valor" de la moneda en cuestion (sea nacional o extranjera), cosa que en los reportes podria mostrar solo el campo "Importe" que vendria ya asignado con los valores de la moneda en cuestion

se me entiende?
alguna sugerencia o idea?

se agradece la atencion

Acci�n al hacer clic un determinado item de un TTreeview

namtaxonlabs — Sat, 28 Aug 2010 18:26:36 GMT

Necesito ayuda, en mi evento OnClick de TTreeView necesito como ejecutar una acci�n determinada en un item (O nodo) de Treeview especifico sin importar el nodo padre que este ya que no puedo hacerlo he hecho con varios metodos pero nada me sale bien (Access Violation, Out of Index)!.

que en lblmarquee se pueda copiar un renglon

gaston260 — Sat, 28 Aug 2010 03:59:17 GMT

Hola estoy intentando que en lblmarquee se pueda copiar cada renglon que va pasando en tiempo real pero estoy muy lejos de poder hacerlo ! ademas no se si es posible hacerlo ?!.

saludos.

Probleas con los arreglos

edgwin — Fri, 27 Aug 2010 20:52:10 GMT

Que tal amigos del foro.

Tengo un problema con los arreglos. Lo explico con un ejemplo de codigo:

C�digo Delphi [-]
TComp = class
  ...
  nombre : string;
  ...
end;

procedure Editar(out arreglo: array of TComp);//Donde TComp es una clase
var
  nvoArreglo : TComp
begin
  ...
  SetLength(nvoArreglo,10);
  ...
  nvoArreglo[inx].Nombre = 'Algo';
  ....
  arreglo := nvoArreglo; -->Aqui me marca el error de Tipos incompatibles.
end;

Pues eso, paso como parametro un object, realizo todo el manejo de las propiedades con una variable local del mismo tipo de objeto, pero al quere igualar la variable local con la del resultado del procedimiento me marca el error de "Incompatible Types: Dynamic Array and Array".

Alguna solucion?

Saludos!

AYUDA sobre el formatfloat en delphi 2010

canguro_2001 — Wed, 25 Aug 2010 23:47:19 GMT

Hola gracias por tomarse el tiempo en leer mi hilo mi problema en si es que uso el formatfloat en delphi 2010 lo estoy usando en windows 7 a 64 bits
esta es mi linea

C�digo:

Panel3.Caption:=formatfloat('#,##0.00',datos.Sql_TituloVentasVEN_GTO.Value);

el resultado desplegado es 1.000,00 esa misma linea lo use en delphi 2009
y el resultado es 1,000.00 que es lo que requiero

me voltea la coma por el punto ya me heche varias paginas y le he cambiado de varias formas el #,##0.00 he puesto varios ejemplos que vienen en otras paginas y me hace lo mismo me cambia el punto por la coma ya vi la configuracion regional por si acaso y tengo como simbolo de decimal el punto

PlaySound , como reproducir aleatorio ?

gaston260 — Wed, 25 Aug 2010 22:25:41 GMT

hola estoy un poco trabado en la reproduccion aleatoria de playsound , puedo reproducir un archivo de tipo wab pero no se como hacerlo aleatorio partiendo de la base de tener varios archivos y algunos los voy a crear limpios (sin sonido) , lo que quiero es que aveces se reproduzca uno o dos archivos de sonido pero la mayoria de las veces este en silencio !