임형구 님이 쓰신 글 :
: 델파이 4 책에 있는 SQL 실행기를 씨 빌더에서 만들려고 합니다.
: 탭 노트북을 이용하여 "SELECT, INSERT"등의 탭을 만들어 놓고
: 각각의 메모 컴포넌트를 만들어서 실행되는 것인데
: 다음의 델파이 코드가 씨 빌더에서 어떻게 써야 하는지
: 잘 모르겠습니다.
: 꼭 좀 부탁드립니다.
:
: var
:     i    : Integer;
:     Memo    : TComponent;
:    
: begin
:     Query1.Close;
:    
:     Memo:=FindComponent(TabbedNoteBook1.ActivePage);
:    
:     If Memo is TMemo then
:         Query1.SQL:=(Memo as TMemo).Lines;
:        
:     Query1.Open;
:    
:    
: 여기에서 우선 TComponent형 변수를 어떻게 만들어야 할지부터 잘 모르겠습니다.   

int i;
TComponent* Memo;

Query1->Close();
Memo = FindComponent(TabbedNoteBook1->ActivePage);

if(Memo->ClassNameIs("TMemo"))
{
    Query1->SQL = ((TMemo*)Memo)->Lines;
}

Query->Open();