Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   dblookupcombobox en un dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=47313)

m8estrella83 24-08-2007 03:03:52

dblookupcombobox en un dbgrid
 
Hola !!!!

Espero me puedan ayudar se los agradeceria mucho !!!!!!!!

Trabajo con delphi 5 y paradox, en un dbgrid muestro los datos de una tabla y en uno de los campos necesito elegir un dato de otra tabla para esto pense en poner un fklookup pero tambien necesito que al ir telceando por ejemplo el nombre de un cliente lo busque en mi segunda tabla hasta encontrar el que necesito y esto no me lo permite hacer el fklookup.

Para eso pense entonces en un dblookupcombobox pero el primer problema es que no se como ponerlo dentro de un dbgrid e buscado en el foro y solo encontre como poner un check box pero para un dblookupcombobox no.

Les agradeceria que me dijeran si se puede hacer esto o alguna otra forma de hacerlo.

eduarcol 24-08-2007 03:09:34

Adaptarlo es facil solo debes cambiar la referencia a la clase checkbox por la que necesitas

intentalo y te ayudare en el camino

m8estrella83 24-08-2007 17:46:32

el codigo que encontre para hacerlo con un check box es el suiguiente

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
Check: Integer;
R: TRect;
begin
if Column.FieldName = 'NombreCampo' then
begin
DBGrid1.Canvas.FillRect(Rect);
Check := 0;
if Table1.FindField('NombreCampo').AsInteger = 1 then Check := DFCS_CHECKED;
R:=Rect;
InflateRect(R,-2,-2); //Disminuye el tamaño del CheckBox
DrawFrameControl(DBGrid1.Canvas.Handle,R,DFC_BUTTON, DFCS_BUTTONCHECK or Check);
end;
end;



pero no se donde ni como modificarlo para un dblookupcombobox

alaparte 22-10-2007 11:11:34

desde ClientDataSet
 
Hola, si he entendido bien, quieres un DbLookUpComboBox en un Grid. Esto lo soluciones desde ClientDataSet. Editas los campos (boton derecho Editor Fields...), en la ventana de campos de nuevo boton derecho y seleccionas 'New Field..' . Se presenta una venta, indicas nobmre, tipo y longitud del nuevo campo y que est de tipo Lookup. Se habilitan los valores para que le indiques la tabla, KeyValue y KeyResult.


Un saludo


La franja horaria es GMT +2. Ahora son las 21:02:18.

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