Delbor ich verstehe nicht was du mir sagen willst
. Ich beschäftige mich mit delphi erst seit einer woche. Im Anhang siehst du was ich meine. Wäre schön wenn die zeilen nicht verschwinden, sondern nur nicht anklickbar wären
//diese Procedure habe ich dem StringGrid1 (Events: OnSelectCell) zugewiesen
//hiermit werden 2 oder mehrer zellen markiert..
//procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol, ARow: Longint; var CanSelect: Boolean);
//begin
//If ComboBox1.ItemIndex=0 then
//canSelect:=(StringGrid1.Cells[2, 1]='');
//end;
//Procedure zugewiesen ComboBox1 (Events: OnClick)
//dieses Ereignis hätte ich gerne. Die Zellen sollten idealerweise nicht
//verschwinden sondern nicht anklickbar sein
procedure TForm1.ZellenNICHTanklicken(Sender: TObject);
begin
Case ComboBox1.ItemIndex of
0: with StringGrid1 do begin
Cells[3,1]:=''; Cells[3,2]:=''; Cells[3,3]:=''; Cells[3,4]:='';
Cells[4,1]:=''; Cells[4,2]:=''; Cells[4,3]:=''; Cells[4,4]:='';
end;
1: with StringGrid1 do begin
Cells[2,1]:=''; Cells[2,2]:=''; Cells[2,3]:=''; Cells[2,4]:='';
Cells[4,1]:=''; Cells[4,2]:=''; Cells[4,3]:=''; Cells[4,4]:='';
end;
2: with StringGrid1 do begin
Cells[2,1]:=''; Cells[2,2]:=''; Cells[2,3]:=''; Cells[2,4]:='';
Cells[3,1]:=''; Cells[3,2]:=''; Cells[3,3]:=''; Cells[3,4]:='';
end;
end;
end;