ja ok, thx
aber guck mal, das is mein code für verdeckte karten
Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if KartenArray[aCol, arow]=0 then
Stringgrid1.Canvas.Draw(rect.left,rect.top,KarteVerdeckt);
end;
procedure TForm1.FormCreate(Sender: TObject);
var i,j:integer;
begin
for i:=0 to 2 do
for j:=0 to 2 do
KartenArray[i,j]:=0;
KarteVerdeckt:=tbitmap.create;
KarteVerdeckt.LoadFromFile(extractfilepath(application.exename)+'clip_image002.bmp');
end;
und das onselectcell jetzt so ähnlich??