디비 그리드에서
스트링 그리드 showSelection을 True로 뒀을때 처럼 하고싶습니다^^;
코딩은 해봤는데...; 생각처럼 안되내요-┏
<!--CodeS-->
procedure TRfIpsilSForm.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
var
i, j : integer;
GXY1, GXY2 : TGridCoord;
inttemp : integer;
begin
if DrawOK then begin
with TDBGrid(Sender) do begin
GXY1 := MouseCoord(X1,Y1);
GXY2 := MouseCoord(X2,Y2);
if GXY1.X > GXY2.X then begin
inttemp := GXY1.X;
GXY1.X := GXY2.X;
GXY2.X := inttemp;
end;
if GXY1.Y > GXY2.Y then begin
inttemp := GXY1.Y;
GXY1.Y := GXY2.Y;
GXY2.Y := inttemp;
end;
for i := GXY1.X - 1 to GXY2.X - 1 do
begin
for J := GXY2.Y - 1 to GXY2.Y - 1 do
begin
//이쪽에서 어떻게 하면 될꺼같은데 하나두 모르겠내요( -_);;
end;
end;
<!--CodeE-->
질문2. MouseCoord의 리턴값이..
DBGrid의 로우, 셀 아닌가요'~'?
이것 가지고 어떻게 해볼려구 했는데^^;
드래그로 선택한 값을... 클립보드로 넣을려구 하거든요...
선택만되면 Selectedrows로 어떻게든 될꺼같은데^^;
아직 개념두 잘 안잡히내요... 그럼 즐코하세요~
읽어주셔서 감사드립니다.