|
적어 주신걸로는 잘 이해가 안되네요. ㅎㅎ
간단한 예제 첨부했으니 참고하세요.
아야 님이 쓰신 글 :
: 하나의 폼에 숫자판를 만들어서 NumEdit에 각납된 숫자를 메인폼에 그 값을 보낼려고 합니다.
: MainForm 숫자를 받아올 Edit를 클릭해서 숫자판 폼을 열었는데... 핸들을 못잡아서 일까 한번더 클릭해야만 그 값이 들어가게 됩니다. 그러자 또다시 계산기 폼이 열리네요 - -;
:
: // MainForm에서 Edit( 파넬로 만들었슴) MouseDown함
: void __fastcall TMainForm::NumberMouseDown(TObject *Sender,
: TMouseButton Button, TShiftState Shift, int X, int Y)
: {
: NumberSelForm->Show(); // 숫자판용 폼개시
: if ( NumberSelForm->OKBtn->ModalResult == mrOk) { // 숫자판용에서 OK를 클릭했으면
: Number->Caption = NumberSelForm->NumEdit->Caption; // 갖고온 숫자를 클릭한Number에넣음
: }
:
: // 여기서 부터가 숫자용 폼입니다
: static void CameraSelectEdit( short data) // 숫자 넣음
: {
: char buf[ 8];
:
: sprintf( buf, "%d", data);
: if ( NumberSelForm->NumEdit->Caption == 0){
: NumberSelForm->NumEdit->Caption = buf;
: } else {
: NumberSelForm->NumEdit->Caption = NumberSelForm->NumEdit->Caption + buf;
: }
: }
: void __fastcall TNumberSelForm::Num0Click(TObject *Sender)
: {
: CameraSelectEdit( 0); // 0을 클릭함
: }
: ........... 0에서 9까지 있는데 생략함..
:
: //
: // 여기서 메인폼에 어떻게 보내야 할지 모르겠습니다.. 도와주세요 - -;
: void __fastcall TNumberSelForm::OKBtnClick(TObject *Sender)
: {
: // 뭔가가 부족한 느낌.... - -;
: //
: NumberSelForm->Close(); // 보낼숫자를 결정해서 지금의 폼은Close함
: }
: // Cancel
: void __fastcall TNumberSelForm::ClearBtnClick(TObject *Sender)
: {
: NumEdit->Caption = 0;
: FormCreate( this);
: }
|