مشکل در dbgrid

با سلام
یک برنامه دارم مینویسم که در ان به dbgrid نیاز دارم چون برنامه را دارم به زبان فارسی مینویسم خواصیت bidimod ان را right to left کردم اما وقتی داده ها زیاد میشوند (به اندازه که نیاز به scroll bar باشد) نقطه تقاطع scroll bar افقی با عمودی را به صورت یک مربع سیاه رنگ نمایش میدهد که باعث کاهش زیبایی برنامه . ورژن دلفی را از 7 به 2009 تغییر دادم تنها تفاوتی کرد مربع رنگی شد و تصاویر پشت فرم را نمایش میدهد .
اگر برایتان مقدور است کمی درباره این موضوع توضیح دهدید.
با تشکر

با سلام
کسی نیست جواب بده؟؟؟

یه نظر من از یک Grid دیگه با امکانات بیشتر استفاده کن.
این مشکلت حل میشه.

با سلام
من کامپوننت TMS v5 را نصب کردم و از advdbgrid ان استفاده کردم اما مشکلم حل نشد.
گفتم شاید با کامپوننت vclskin v5 بتونه کمکم کنه اما با این روش هم مشکل حل نشد.
به گفته ی یکی از دوستانم در بخش uses عبارت xpman را نوشتم اما باز هم این مشکل حل نشد.
اگر ممکنه بیشتر درباره این موضوع توضیح دهید.
با تشکر

با سلام
کسی نیست جواب بده؟؟؟

دوست عزیز. همیشه جوابها بلافاصله یعد از پست شما ارسال نمیشه و شما باید کمی صبر داشته باشید.
مجموعه TMS گریدهای قوی خوبی داره. من الان دسترسی به دلفی ندارم تا براتون دقیق چک کنم. ولی اگه مشکلتون حل نشده بهم اطلاع بدین تا شنیه نتیجه رو یهتون بدم.

با سلام
از پاسخگویی شما متشکرم(مرد مباح).
من هنوز مشکلم حل نشده (گرید tms و vclskin و xpman را امتحان کردم)
یکی از دوستانم می گفت وقتی با دلفی 7 کار میکرده این مشکل براش پیش امده و تونسته با دانلود چند فایل dll از اینترنت مشکل را حل کند اما در حال حاضر نام ان فایل ها را به یاد ندارد و من هم هر چه گشتم چنین چیزی پیدا نکردم.
با تشکر

من در مورد این dll ها چیزی نمیدونم.
و راستش تا حالا هم چنین مشکلی رو ندیدم. ولی امیدوارم که بتونم به زودی کمکتون کنم.

اینها چیزهایی نیست که تو برنامه تاثیر گذار باشه .
من خودم از ابزار NextSuite استفاده مینم و مشکلی هم نداره (تو همین فروم سرچ کن)

مي توني از اسكينهاي AlphaControls استفاده كني. ولي من بهت مي گم كه اين مشكلها مشكل مهمي نيست.
براي حل اين مشكل اين راه رو امتحان كن شايد خوب بشه. مي گم شايد نه قطعاً. يه پنل توي فرمت بزار و DBGrid رو توي پنلت قرار بده و خاصيت Align‌ اون رو به Client تغيير بده.
موفق باشين

با سلام
از تمامی دوستان به خاطر پاسخگویی و توجه متشکرم.
با تشکر

با سلام
دوستان گفتم تایپیک نزنم سایت شلوغ شه
سوالم رو اینجا میپرسم مشکل من اینه که وقتی روی نوار اسکرول scroll در dbgrid ام کلیک میکنم خطا میگیره که ازش عکس گرفتم اگه میشه راهنمایی کنید
[HTML]
http://www.justupit.com/get.php?id=d106b47e8b64db8ab48746efaa7149d6
[/HTML]

سلام. سایتی که فایل رو در اون آپلود کردید قابل اطمینان نیست:

نقل قول:

---

کد:

---

www.justupit.com

---

has been reported as an attack site and has been blocked based on your security preferences.

---

لطفا متن پیغام خطا و کدهایی که احتمالا در رویداد های dbgrid نوشتید رو قرار بدیدو یا فایل رو در جایی مثل [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] قرار بدید

با سلام به دوستان
متن خطا اینه
arguments are of the worong type,are out of acceptable range/ or are in conflict with one another
و کدها که در قسمت on cellclick اینه

کد:

---

edit1.text :=data.s_vekalat.fieldbyname('code_m').value;
edit2.text :=data.s_vekalat.fieldbyname('safe').value;
edit3.text :=data.s_vekalat.fieldbyname('jeld').value;
edit4.text :=data.s_vekalat.fieldbyname('shomare').value;
edit5.text :=data.s_vekalat.fieldbyname('shomare_ab').value;
edit6.text :=data.s_vekalat.fieldbyname('hoze').value;
edit7.text :=data.s_vekalat.fieldbyname('h_sabt').value;
edit8.text :=data.s_vekalat.fieldbyname('h_tahrir').value;
edit9.text :=data.s_vekalat.fieldbyname('b_oragh').value;
edit10.text :=data.s_vekalat.fieldbyname('b').value;
edit11.text :=data.s_vekalat.fieldbyname('kol').value;
edit12.text :=data.s_vekalat.fieldbyname('noe_s').value;
edit13.text :=data.s_vekalat.fieldbyname('shomare_a').value;
edit14.text :=data.s_vekalat.fieldbyname('hoze_a').value;
memo1.Lines.Text :=data.s_vekalat.fieldbyname('moakel').value;
memo2.Lines.Text:=data.s_vekalat.fieldbyname('vakil').value;
memo3.Lines.Text:=data.s_vekalat.fieldbyname('m_v').value;
memo4.Lines.Text:=data.s_vekalat.fieldbyname('ekhtiarat').value;
maskedit1.text :=data.s_vekalat.fieldbyname('tarikh').value;
edit15.text :=data.s_vekalat.fieldbyname('tarikh_a').value;
edit16.text :=data.s_vekalat.fieldbyname('code_s').value;

---

و در قسمت on DrawColumnCell اینه

کد:

---

var
  test1: Real;
  RowNo: Integer;
  farbe:TColor;
begin
 Try
  with (Sender as TDBGrid) do
  begin
    if (gdSelected in State) then
    begin
      Canvas.Brush.Color :=clActiveBorder;
      end
    else
    begin
      rowno :=  (Sender as TDBGrid).DataSource.DataSet.RecNo;
      test1 := (RowNo / 2) - trunc(RowNo / 2);
      if test1 = 0 then
      begin
        farbe := clWhite;
      end
      else
      begin
        farbe := clWhite;
      end;
      Canvas.Brush.Color := farbe;
      Canvas.Font.Color := clBlack;
    end;
    Canvas.FillRect(Rect);
    if Column.FieldName<>'' then
      Canvas.TextOut(Rect.Left + 2, Rect.Top + 1, Column.Field.DisplayText);
  end
 Except
 End;

---

که برای تغییر رنگ رکورد انتخاب شده
ممنون میشم کمک کنید بازم مرسی داش فرهاد

از اونجا که از نوع داده ای آرگومان ها و محدوده ی قابل قبول یا تداخل با یک آرگومان دیگه ایراد میگیره، باید برنامه رو در این قسمت از کد ها trace کنید. مکان نما رو در قسمت edit1.text :=data.s_vekalat.fieldbyname('code_m').value قرار بدید و f5 رو بزنید، بعد برنامه رو اجرا کنید و به این قسمت از کد که رسید با F8 برنامه رو اجرا کنید تا متوجه بشید مشکل از کجاست
موفق باشید