void __fastcall TForm1::Button6Click(TObject *Sender)
{
Graphics::TBitmap *pBitmap = new Graphics::TBitmap;
pBitmap->LoadFromResourceName((int)HInstance,"IDB_BITMAP1");
for(int i=0; i<30;i++)
{
ListBox1->Items->AddObject("qwerty",pBitmap);   
}
}
void __fastcall TForm1::ListBox1DrawItem(TWinControl *Control, int Index,
      TRect &Rect, TOwnerDrawState State)
{
Graphics::TBitmap *pBitmap;
  int     Offset = 1;   
  TCanvas *pCanvas = ((TListBox *)Control)->Canvas;
  pCanvas->FillRect(Rect); // clear the rectangle
pBitmap = (Graphics::TBitmap *)((TListBox *)Control)->Items->Objects[Index];
if (pBitmap)
{
pCanvas->BrushCopy(Bounds(Rect.Left + Offset, Rect.Top, pBitmap->Width, pBitmap->Height), pBitmap, Bounds(0, 0, pBitmap->Width, pBitmap->Height), clWhite);
Offset += pBitmap->Width+1;   // add four pixels between bitmap and text
}
pCanvas->TextOut(Rect.Left + Offset, Rect.Top, ((TListBox *)Control)->Items->Strings[Index]);
}

/*==          ПРИМЕР 10.2          ==*/
/*=== Чтение и анализ гл.загруз.записи твердого диска ===*/
#include <dos.h>
#define byte unsigned char
#define word unsigned int
#define dword unsigned long
#define SECT(x) x&0x3f
#define TRK(x) (x>>8)|((x<<2)&0x300)
main()
 {
 /* структура элемента раздела */
 struct Part {
  byte ActFlag;           /* описатель*/
        /* физический адрес начала раздела */
   byte Begin_Hd;         /* # головки */
   word Begin_SecTrk;  /* # сектора и дорожки */
  byte SysCode;          /* код системы */
         /* физический адрес конца раздела */
   byte End_Hd;          /* # головки */
   word End_SecTrk;   /* # сектора и дорожки */
  dword RelSec;       /* # сектора начала */
  dword Size;         /* число секторов */
  };
 /* стpуктуpа главной загpузочной записи */
 struct MBR {
  char LoadCode[0x1be];  /* пpогpамма загpузки */
  struct Part rt[4];     /* 4 эл-та pазделов */
  word EndFlag;          /* подпись MBR */
  } mbr;
 int x=10,y;   /* экpанные кооpдинаты */
 byte head=0;   /* номеp головки (0) */
 word Sect_Trk=1; /* номеp доpожки и сектоpа (0,1) */
 int ndrive=0;  /* номеp лог.диска */
 word *EndList;  /* указатель на подпись */
 union REGS rr;
 struct SREGS sr;
 word i;

 clrscr();
 printf("Разделы жесткого диска # 1\n");
 printf("==========================\n\n");
 printf("Лог.диск    \nПризнак   =  \n
 printf("Код системы =  \nНачало: гол.=  \n");
 printf("   дор. =  \n   сект. =  \n");
 printf("Конец : гол.=  \n    дор. =  \n");
 printf("    сект.=  \nНач.сектор =  \n");
 printf("Размер   =  \n");
NEXT:
  /* Чтение при помощи прерывания 13. Только таким путем
    можно прочитать MBR, т.к. она не принадлежит никакому
    логическому диску. */
  rr.h.ah=2;      /* Чтение */
  rr.h.al=1;      /* Секторов 1 */
  rr.h.dl=0x80;    /* Тв.диск */
  rr.h.dh=head;    /* Головка */
  rr.x.cx=Sect_Trk;  /* Дорожка, сектор */
  sr.es=FP_SEG(&mbr); /* Адрес буфера в ОП */
  rr.x.bx=FP_OFF(&mbr);
  int86x(0x13,&rr,&rr,&sr);
  /* Проверка ошибок чтения */
  if (rr.x.cflag) {
   printf("Ошибка чтения: %x. ",rr.h.ah);
   printf("Нажмите любую клавишу...\n\7");
   getch();
   exit();
   }
 /* В нач.установках EndList указывает на 1-й
   байт 1-го элемента pаздела */
 for (EndList=(word *)&mbr.rt[(i=0)];
   /* пока не встpетилась подпись MBR или pаздел
     нулевого pазмеpа */
   (*EndList!=0xaa55)&&(mbr.rt[i].Size>0L);
   /* пеpеход к след. эл-ту (++i), EndList указывает
     на 1-й байт следующего элемента pаздела */
   EndList=(word *)&mbr.rt[++i]) {
  /* кооpдинаты куpсоpа */
  y=4; x+=7; gotoxy(x,y++);
  if (mbr.rt[i].SysCode==5) printf("Ext  ");
  else printf("%-7c",'C'+ndrive++);
  gotoxy(x,y++); printf("%02xH    ",mbr.rt[i].ActFlag);
  gotoxy(x,y++); printf("%-7d",mbr.rt[i].SysCode);
  gotoxy(x,y++); printf("%-7d",mbr.rt[i].Begin_Hd);
  gotoxy(x,y++);
  printf("%-7u",TRK(mbr.rt[i].Begin_SecTrk));
  gotoxy(x,y++);
  printf("%-7u",SECT(mbr.rt[i].Begin_SecTrk));
  gotoxy(x,y++); printf("%-7d",mbr.rt[i].End_Hd);
  gotoxy(x,y++);
  printf("%-7u",TRK(mbr.rt[i].End_SecTrk));
  gotoxy(x,y++);
  printf("%-7u",SECT(mbr.rt[i].End_SecTrk));
  gotoxy(x,y++); printf("%-7lu",mbr.rt[i].RelSec);
  gotoxy(x,y++); printf("%-7lu",mbr.rt[i].Size);
  if (mbr.rt[i].SysCode==5) {
   /* если код системы 5, pаздел содеpжит свою таблицу
    pазделов; устанавливается ее дисковый адpес,
    и новая таблица считывается в память */
   head=mbr.rt[i].Begin_Hd;
   Sect_Trk=mbr.rt[i].Begin_SecTrk;
   goto NEXT;
   }
  }
 gotoxy(x,y++); printf("\n\nНажмите любую клавишу...");
 getch();
}

   SECURITY_ATTRIBUTES sa;
   STARTUPINFO si;


   sa.nLength = sizeof(sa);
   sa.lpSecurityDescriptor = 0;
   sa.bInheritHandle = true;
   HANDLE hf = CreateFile(message_file, GENERIC_WRITE | GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, &sa, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL,0);
...

   ZeroMemory(&si,  sizeof(si));
   si.cb = sizeof(si);
   si.dwFlags = STARTF_USESTDHANDLES | STARTF_USESHOWWINDOW;
   si.hStdOutput = hf;
   si.wShowWindow = SW_HIDE;

   if(CreateProcess(0, cline,0,0,true,0,0,0,&si,&pi))
   {
      CloseHandle(pi.hThread);
      WaitForSingleObject(pi.hProcess,INFINITE);
      GetExitCodeProcess(pi.hProcess ,&ecode);
      CloseHandle(pi.hProcess);   

....