C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[55619] Edit1, Edit2, Panel1, RichEdit1 응용
첫 입문 [] 1141 읽음    2008-12-29 18:32
안녕하세여^^
c++빌더을 한번 써 볼려구 하는데 도저히 몰라서 글을 올리게 되네요^^;;
참고로 c++, c++빌더라는 프로그램 종류을 처음 하는건데요...
이게 모하는 프로그램인줄도 당체 몰라서,,ㅜㅜ
연습으로 하나를 해볼려구 하는데요,,,
        
         Edit1, Edit2, Panel1, RichEdit1
이렇게 사용을 해서 짜볼려구 하는데요

Edit1에는 숫자를 입력시 RichEdit1에 구구단을 표기 하구 싶어요
예) Edit1=1 이면
     RichEdit1 = 1 x 1 = 1
                       1 x 2 = 2
                       1 x 3 = 3
                             :
                             :
                       1 x 9 = 9
    이렇게 표기가 되구요

Edit2 에 숫자 입력 후 엔터 누르면

Panel1 에서는

Edit1 x Edit2 = 값
예) 11 x 2 = 22
22 라는 값만 표기 되게나여^^

제가 할수 있는 것 까지는 

__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
        Edit1->Text = "";
        Edit2->Text = "";
        Panel1->Caption = "";
        RichEdit1->Text = "";

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        Close ();
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Edit1Change(TObject *Sender)
{
        int                     sum;
        int                     in_num;
        String                  Message;

        if ( Edit1->Text == "" ) return;
        in_num = StrToInt( Edit1->Text );
        if ( in_num == 0 ) return;
        RichEdit1->Text = "구구단 [" + Edit1->Text + "]단";
        for ( char i = 1; i < 10; i++ )
        {
                sum = i * in_num;
                Message = Edit1->Text + " * " + IntToStr( i ) + " = " + IntToStr( sum );
                RichEdit1->Lines->Add( Message );
        }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
        Edit1->Text = "";
        Edit2->Text = "";
        Panel1->Caption = "";
        Label1->Caption = " X ";
        Label2->Caption = " = ";
        RichEdit1->Text = "";

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Edit2Change(TObject *Sender)
{
        int             sum;
        int             in_num;
        String          Message;

        if ( Edit2->Text == "" ) return;
        in_num = StrToInt( Edit2->Text );
        if ( in_num ==0 ) return;

요기까지 해봤는데요 막히네여 ㅜ.ㅜ
제가 처음 하는 거라서여 자세히 하는 법을 올려주시면
너무나도 감사 할거에요  그리구 복받을실 거구^^
암무토록 부탁드려여(꾸벅)
꼭 부탁드려여

+ -

관련 글 리스트
55619 Edit1, Edit2, Panel1, RichEdit1 응용 첫 입문 1141 2008/12/29
55623     Re:Edit1, Edit2, Panel1, RichEdit1 응용 번외편 1310 2008/12/30
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.