Hi, Delpher!
Ich habe eine Prc stringgridselectCell(..).
Desweiteren eine Prc mouse9click(..).
In der globalen Variablen DBgridToSGgrid ist der Zelleninhalt aus
Einer DBGridzelle gespeichert.
Gibt es eine Möglichkeit, die 1.Proc so in die zweite einzubinden,
dass ich zum Eintragen in das SGgrid direkt einen MouseRightClick machen kann,
ohne vorher die SGzelle erst auswählen zu müssen?
Code:
[delphi]
procedure TForm1.StringGrid9SelectCell(Sender: TObject; Col, Row: Longint; var CanSelect: Boolean);
begin edit16.text := inttostr(row); edit17.text := inttostr(col-2); end;
procedure tform1.mouse9click(sender:tobject; button: tmousebutton;
shift: tshiftstate; x, y: integer);
//var tf : boolean;
begin
//Stringgrid9selectcell(self,strtoint(edit17.text)+2,strtoint(edit16.text),tf);
if ssright in shift then
stringgrid9.cells[strtoint(edit17.text)+2,strtoint(edit16.text)] := DBgridToSGgrid;
end;