ورود

View Full Version : غیر فعال کردن scrol نوار کنار dbgrid


behzad_dr
چهارشنبه 16 شهریور 1390, 12:49 عصر
سلام ببخشید شاید این سوال قبلا جواب داده شده اما هر چه جستجو کردم پیدا نکردم

چطور میشه این نوار کنار dbgrid رو غیر فعال کنیم ؟
behzad_dr
چهارشنبه 16 شهریور 1390, 13:02 عصر
دوست عزیز ببخشید فکر میکنم سوال منو متوجه نشدید

من منظورم نوار کشویی لغزنده کنار DBgried که احتمالا تو پراپرتیهاش یه جائی داره که OFF اش کنم
Delphi 2010
چهارشنبه 16 شهریور 1390, 15:54 عصر
توی قسمت Option از شی DBGrid موجود هستش
behzad_dr
پنج شنبه 17 شهریور 1390, 12:04 عصر
توی قسمت Option از شی DBGrid موجود هستش

موضوع اینه که کدوم قسمتشه؟
pop123
دوشنبه 28 شهریور 1390, 01:38 صبح
type
TNoScrollBarDBGrid = class(TDBGrid)
private
protected
procedure Paint; override;
public
published
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('Samples', [TNoScrollBarDBGrid]);
end;

{ TNoScrollBarDBGrid }

procedure TNoScrollBarDBGrid.Paint;
begin
SetScrollRange(Handle, SB_VERT, 0, 0, false);
inherited;
end;
این رو امتحان کنید