نحوه اضافه کردن یک ستون برای شماره ردیف در گرید - کدهای آماده دلفی

از حکمت [مرد مؤمن]، شناخت خویشتن است . [امام علی علیه السلام]

کدهای آماده دلفی

پست الکترونیک

نحوه اضافه کردن یک ستون برای شماره ردیف در گرید

نحوه اضافه کردن یک ستون برای شماره ردیف در گرید

{+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

1. create new blank field in dbgrid

2. rename the title with "No"

3. put this code in OnDrawColumncell

4. Now your Grid has a row number

+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++}

procedure TForm1.DBGrid1DrawColumnCell(Sender: T; const Rect: TRect;

DataCol: Integer; Column: TColumn; State: TGridDrawState);

begin

if DataSource1.DataSet.RecNo > 0 then

begin

if Column.Title.Caption = "No" then

DBGrid1.Canvas.TextOut(Rect.Left + 2, Rect.Top, IntToStr(DataSource1.DataSet.RecNo));

end;

end;

برگرفته شده از سایت دنیای برنامه نویسی دلفی(http://mt85.blogfa.com)

محمد مقصودلو ::: شنبه 87/4/29::: ساعت 11:14 صبح

نظرات دیگران: نظر

لیست کل یادداشت های این وبلاگ

بهترین کامپوننت تاریخ شمسی در دلفی 7
یک ساعت فوق العاده
اضافه کردن زبان فارسی به ویندوز XP
یک Message Dialog با امکان تغییر نوشته ی دکمه و تمام قسمتها
بستن پنجره
پاک کردن برنامه به وسیله ی خودش
دانلود کردن سورس یک سایت
بدست آوردن آدرس جاری IE
پاک کردن آدرسهای IE
آموزش کار با IntraWeb در دلفی
مبدل ها
تصویر به bmp2icon) Icon)
تشخیص اینکه HARD DISK ما چند درایو دارد.
اینم یک برنامه ای که ICON درایوها را تغییر می دهد.
درست کردن فیلتر زرد رنگ روی ایمیج
[همه عناوین(126)][عناوین آرشیوشده]

>> بازدیدهای وبلاگ <<

بازدید امروز: 2

بازدید دیروز: 72

کل بازدید :88549

>> درباره خودم <<

محمد مقصودلو
در این وبلاگ سعی میکنم مطالب مربوط به برنامه نویسی دلفی ، پاسکال و گرافیک رایانه ای 2 بعدی و 3 بعدی را به روز کنم منتظر سوالات شما نیز هستم

>>تست سرعت تایپ<<

9 کلمه

Speed test

>> پیوندهای روزانه <<