Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian S.,
4. Mai 2003
Dann mal so:
var zellen : Array of Array of Boolean; //Genauso viele Elemente wie das StringGrid Zellen hat, muss irgendwo noch init. werden
procedure TForm1.StringGrid1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
VAR col, row : Integer;
begin
col:=StringGrid1.MouseCoord(x,y).x;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Christian S.,
3. Mai 2003
Hi!
Was Besseres fällt mir um die Uhrzeit nicht ein, aber probier's mal hiermit:
var
grid_x : Integer = -1;
grid_y : Integer;
implementation