SQl de bold yazi

[musti]

S.a
sp lerde veya view lerde birde istedigimiz alanları bold olarak gosterebilsek ne guzel olur demi.

abartıgım farkındayım ama neden olmasın

[mussimsek]

A.S.

bu tamamen kullandığınız veritabanı yönetim aracı ile ilgili bir olay. Hangi veritabanını kullandığınızı söylerseniz, öneri yapan olabilir.

Firebird ise IB Expert o işi yapıyor zaten.

Kolay gelsin.

[musti]

s.a.
tamam abi islem bitmistir olay cozulmustur.

tsk ler.

[pro_imaj]

Merhaba,

Çözümü yazsaydınız, forum amacına ulaşmış olurdu.

Kolay gelsin

[musti]

aslında yazacaktım ama delphi ile alakası yok diye ama yine
Tabiki sql yerine c de formda yazdim
Soyleki

Kod: Tümünü seç

 if(DataCol<2)
 {
    if(DataModule1->HP->FieldByName("KODU")->Text.Length()==1)
    {
     DBGrid1->Canvas->Font->Style = TFontStyles() << fsBold ;
        DBGrid1->Canvas->Font->Color=clNavy;
       DBGrid1->Canvas->FillRect(Rect);
       DBGrid1->Canvas->TextOut(Rect.Left+2, Rect.Top+2,Column->Field->AsString);

     }
    if(DataModule1->HP->FieldByName("KODU")->Text.Length()==2)
     {
      DBGrid1->Canvas->FillRect(Rect);
      DBGrid1->Canvas->TextOut(Rect.Left+10, Rect.Top+2,Column->Field->AsString);
      }

    if(DataModule1->HP->FieldByName("KODU")->Text.Length()==3)
     {
     //  DBGrid1->Canvas->Font->Color=clRed;
       DBGrid1->Canvas->FillRect(Rect);
       DBGrid1->Canvas->TextOut(Rect.Left+20, Rect.Top+2,Column->Field->AsString);
      }


    if(DataModule1->HP->FieldByName("KODU")->Text.Length()>3)

     {
       DBGrid1->Canvas->Font->Style = TFontStyles() << fsBold ;
       DBGrid1->Canvas->FillRect(Rect);
       DBGrid1->Canvas->TextOut(Rect.Left+30, Rect.Top+2,Column->Field->AsString);
      }

//    DBGrid1->DefaultDrawColumnCell(Rect, DataCol, Column, State);