delphi4arab منتديات دلفي للعرب
حول StringGrid و نقل رسم بين الخلايا - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : حول StringGrid و نقل رسم بين الخلايا (/showthread.php?tid=1218)



حول StringGrid و نقل رسم بين الخلايا - flashier2007 - 19-09-2009

كيف يمكنني ان اضع رسم داخل خلية فقط من stringgrid وبعدها استطيع نقلها الى خلية اخرى بواسطة
draganddrop

شكرا مسبقا


حول StringGrid و نقل رسم بين الخلايا - kachwahed - 22-09-2009

[COLOR="black"]أولا السلام عليكم.
للرسم
كود :
procedure TForm1.Button1Click(Sender: TObject);
var
  Bitmap: TBitmap;
begin
  Bitmap:=TBitmap.Create;
  Bitmap.LoadFromFile('C:\factory.bmp');
  StringGrid1.Canvas.StretchDraw(StringGrid1.CellRect(1,1),Bitmap);
  Bitmap.Free;
end;
للنقل يمكن استخدام الحدث DragDrop.[/COLOR]