Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-02-2021
giulichajari giulichajari is offline
Miembro
 
Registrado: nov 2012
Posts: 306
Poder: 12
giulichajari Va por buen camino
Copiar este formulario de Access es posible en Delphi?

Tengo el siguiente formulario de una aplicacion vieja que se quiere renovar en Access:

https://ibb.co/YTYqWRX

Hasta ahora hice la parte de arriba pero se me complico con la grilla.Para lo mismo estoy usando un DBGrid pero no logro hacerlo:
Tiene el listado de codigos alfanumericos en la columna codigo por cada registro(esto por lo que busque se puede hacer con la propiedad PickList de Column). Cuando se selecciona un codigo aparece el nombre y precio del producto correspondiente. A su vez el combo lista que se ve es otra tabla de la base de datos que aplica un descuento de acuerdo al cliente(ya esta predeterminada) pudiendo cambiarse.
Se que no es algo sencillo al menos para mi:

Código Delphi [-]
 procedure TDataModule1.cdsptemporalNewRecord(DataSet: TDataSet);
begin
  SetupGridPickList('Codigo','Select * from productos;');
end;

Hasta ahora uso el evento on new record(hay un boton de agregar registro),con la idea de llenar un TClientDataSet como tabla temporal, y cargar el combo haciendo uso de picklist:
Código Delphi [-]
procedure TDataModule1.SetupGridPickList(const FieldName, sql: string);
var
 slPickList:TStringList;
 Query : TSQLQuery;
 i : integer;
begin
 slPickList:=TStringList.Create;
 Query := TSQLQuery.Create(self);

 Query.SQLConnection :=DataModule1.CONEXION;
 Query.SQL.Text := sql;
 Query.Open;
 //Fill the string listwhile not Query.EOF dobegin
 Query.First;
 while not Query.eof do
   begin
       slPickList.Add(Query.Fields[9].AsString);
       Query.Next;
   end;



 Form3.DBGrid1.Columns[1].PickList:=slPickList;


end;

Alguna sugerencia?Es posible?
Responder Con Cita
 



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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Sera posible este tipo de ShowModal? pborges36 OOP 4 12-09-2008 00:49:12
¿Es posible cerrar automaticamente un formulario en delphi? mabjes OOP 7 13-07-2007 17:47:26
Copiar registros de una tabla a otra en Access con Delphi Gelmin Conexión con bases de datos 1 01-07-2005 12:35:04
es posible este tipo de consulta? manos SQL 7 09-05-2005 15:43:48
Ver un formulario de Access en delphi?? razadi Servers 2 06-08-2004 00:31:09


La franja horaria es GMT +2. Ahora son las 11:01:23.


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