|
초보자 님이 쓰신 글 :
: 보통 Form위에 Edit나 Label 등의 Componet를 Drag해서 가져다 놓고 사용하는데
:
: 이렇게 하지 않고 프로그램에서 Coding을 사용하여 위치시키는 방법은 없나요?
:
: 좋은 아이디어 있으시면 제공해주시면 감사하겠습니다.
Form의 OnCreate 이벤트 핸들러 함수 등에서 컴포넌트는 생성하고, parent 설정 등등을 하면 됩니다.
TPanel* panel=new TPanel(this);
panel->Parent=this;
panel->Width=102;
panel->Height=114;
panel->Top=5;
panel->Left=5;
panel->OnMouseDown=MiniViewPanelMouseDown;
panel->OnMouseUp=MiniViewPanelMouseUp;
panel->OnClick=MiniViewDrawGridClick;
TDrawGrid* grid=new TDrawGrid(panel);
grid->Parent=panel;
grid->Width=96;
grid->Height=96;
grid->Top=16;
grid->Left=3;
grid->FixedCols=0;
grid->FixedRows=0;
grid->DefaultColWidth=5;
grid->DefaultRowHeight=5;
grid->DefaultDrawing=false;
grid->ColCount=16;
grid->RowCount=16;
grid->GridLineWidth=1;
grid->ScrollBars=ssNone;
grid->Options=TGridOptions() << goFixedVertLine << goFixedHorzLine << goVertLine << goHorzLine;
grid->OnDrawCell=(TDrawCellEvent)&MiniViewDrawGridDrawCell;
grid->OnMouseDown=MiniViewPanelMouseDown;
grid->OnMouseUp=MiniViewPanelMouseUp;
grid->OnClick=MiniViewDrawGridClick;
|