Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   mostrar registro de una celda de un dbgrid en un edit (https://www.clubdelphi.com/foros/showthread.php?t=81011)

edgar_prospero 02-10-2012 00:10:08

mostrar registro de una celda de un dbgrid en un edit
 
que hay amigos aqui ando con algo medio extraño pero que necesito, quiero que al dar clic derecho en un dbgrid me muestre el campo codigo en un edit, lo intente de la siguiente manera pero solo me funciono con click izquierdo del mouse y yo lo que necesito es que al darle click derecho me haga lo que ,mencione anteriormente:

Código Delphi [-]
procedure TForm4.DBGrid1CellClick(Column: TColumn);
begin
prueba.Text := clientdataset1.FieldByName('codigo').asString;
end;

roman 02-10-2012 00:31:32

Necesitas usar el evento OnMouseDown o OnMouseUp.

// Saludos

edgar_prospero 02-10-2012 00:34:44

sabes que ya lo intente, pero necesito darle click derecho 2 veces para que me ponga el codigo correcto en el edit, no se si este mal el codigo que estoy usando

Casimiro Notevi 02-10-2012 00:57:50

Cita:

Empezado por edgar_prospero (Mensaje 446016)
... no se si este mal el codigo que estoy usando

¿Y dónde está el código? ;)
Recuerda que no tenemos bola de cristal :D

ecfisa 02-10-2012 15:18:26

Hola Edgar.

¿ Ya probate con el evento OnMouseUp como te sugirieron ?

Código Delphi [-]
procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if Button = mbRight then
    Prueba.Text:= ClientDataSet1.FieldByName('CODIGO').AsString
  ...
end;

Saludos.


La franja horaria es GMT +2. Ahora son las 10:59:13.

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