Ver Mensaje Individual
  #1  
Antiguo 11-11-2009
chico_bds chico_bds is offline
Miembro
 
Registrado: ene 2007
Posts: 50
Reputación: 18
chico_bds Va por buen camino
Saber al boton que se le dio click en un StringGrid

Hola amigos teno el siguiente problema a ver si me pueden ayudar... a cada fila de un StringGrid le creo dos botones pero necesito saber como puedo hacer para en el evento onclick enviar un parametro con la fila a la que se le dio click....

Código Delphi [-]
while not (ds.Eof) do
begin

//ShowMessage(ds.FieldByName('nombres').AsString);

StringGrid1.Cells[0, contador] := ds.FieldByName('nombres').AsString;
StringGrid1.Cells[1, contador] := ds.FieldByName('apellidos').AsString;
StringGrid1.Cells[2, contador] := ds.FieldByName('cedula').AsString;
StringGrid1.Cells[3, contador] := ds.FieldByName('nombreArtistico').AsString;
StringGrid1.Cells[4, contador] := ds.FieldByName('clasificacion').AsString;
StringGrid1.Cells[5, contador] := ds.FieldByName('nacionalidad').AsString;

btn := TButton.Create(Self);
btn.Caption:= 'Modificar';
btn.Width:= 87;
btn.Parent:= StringGrid1;
btn.BoundsRect:= StringGrid1.CellRect(6, contador);

btnView := TButton.Create(Self);
btnView.Caption:= 'Formulario';
btnView.Width:= 87;
btnView.Parent:= StringGrid1;
btnView.BoundsRect:= StringGrid1.CellRect(7, contador);

Inc(contador);

ds.Next;

end;

Saludos desde ya muchas gracias
__________________

Responder Con Cita