Einzelnen Beitrag anzeigen

Benutzerbild von City Light
City Light

Registriert seit: 17. Sep 2002
314 Beiträge
 
#13
  Alt 27. Dez 2002, 16:08
Hier noch mal was aus der Delphi Hilfe

Delphi-Quellcode:
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  Column, Row: Longint;
begin
  StringGrid1.MouseToCell(X, Y, Column, Row);
  StringGrid1.Cells[Column, Row] := 'Spalte ' + IntToStr(Column) +
    ', Zeile ' + IntToStr(Row);
end;
Viele Grüße ,Tino
Bis bald man liest sich
Tino
  Mit Zitat antworten Zitat