線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1075
推到 Plurk!
推到 Facebook!

請各位大大幫幫我忙...有關於MainMenu的問題

尚未結案
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-08-31 19:56:59 IP:203.70.xxx.xxx 未訂閱
我想知道我的問題是出在哪裡....    這是compile後出現的錯誤訊息: [C++ Error] Unit2.cpp[23] : E2108 Improper use of typedef 'TForm' [C++ Error] Unit2.cpp[24] : E2379 Statement missing;        以下是程式碼內容:    //---------------------------------------------------------------------------    #include  #pragma hdrstop #include "Unit2.h" #include "Unit3.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm2 *Form2; TForm3 *Form3; //--------------------------------------------------------------------------- __fastcall TForm2::TForm2(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm2::ACO2Click(TObject *Sender) { TForm*Form3 Form3 = new TForm3(Application); Form2->Caption = Form3->Caption; Form3->Show(); } //---------------------------------------------------------------------------
ENIX007
高階會員


發表:28
回覆:274
積分:185
註冊:2003-11-27

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-08-31 20:24:55 IP:218.172.xxx.xxx 未訂閱
引言:
void __fastcall TForm2::ACO2Click(TObject *Sender)
{
TForm*Form3  //少一個分號
Form3 = new TForm3(Application);
Form2->Caption = Form3->Caption;
Form3->Show();    }
 
另外這樣會使得Form3變成區域變數,這個區域變數離開該函式就清掉了, 會造成記憶體流失問題,請看以下連結 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=55432 參考看看 程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
------
程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-08-31 20:46:29 IP:203.70.xxx.xxx 未訂閱
可是因為我這樣做了以後啊.....還是有問題????    就像我傳上去的圖一樣
nlj859
資深會員


發表:139
回覆:375
積分:322
註冊:2004-03-20

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-08-31 21:16:17 IP:219.80.xxx.xxx 未訂閱
Hello kancewang,    目前總共有Form1,Form2,Form2上有一個Button1,紅字的部份為新加入的部份,看你有那裡沒做到的.    Unit2.cpp:
#include 
#pragma hdrstop    #include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm2::Button1Click(TObject *Sender)
{
  TForm *Form3;
  Form3 = new TForm(Application);
  Form3->Caption = Form2->Caption;
  Form3->Show();
}
如果還是不行的話,就把檔案上傳吧~或是再把你的步驟跟狀況更詳細的表達.
引言: nlj859大大你好 我是用mainmenu連結的.......為什麼你po的程式碼是用ButtonClick呢 還是說ButtonClick也可以呢???....煩請你解答一下...謝謝 void __fastcall TForm2:: "Button1Click" (TObject *Sender) { TForm *Form3; Form3 = new TForm(Application); Form2->Caption = Form3->Caption; Form3->Show(); }
使用Button和MainMenu裡面的Item Click是一樣的意思. 你只要把Button1拿掉,換上底下的code就好了.(ACO為Mainmenu上的一個Item)
void __fastcall TForm2::ACO1Click(TObject *Sender)
{
   TForm *Form3;
   Form3 =new TForm(Application);
   Form2->Caption = Form3->Caption;
   Form3->ShowModal();
}
引言: 因為我的Form3裡面有資料要顯示...可是您的程式碼卻是開出一個空白的MDI Form ...
你應該從沒講過你的Form3裡面有什麼東西吧.^_^" 發表人 - nlj859 於 2004/08/31 22:30:33
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-08-31 21:57:50 IP:203.70.xxx.xxx 未訂閱
nlj859大大你好      我是用mainmenu連結的.......為什麼你po的程式碼是用ButtonClick呢      還是說ButtonClick也可以呢???....煩請你解答一下...謝謝    void __fastcall TForm2:: "Button1Click" (TObject *Sender) {   TForm *Form3;   Form3 = new TForm3(Application);   Form2->Caption = Form3->Caption;   Form3->Show(); }
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-08-31 22:17:25 IP:203.70.xxx.xxx 未訂閱
void __fastcall TForm2::ACO1Click(TObject *Sender) { TForm *Form3; Form3 =new TForm(Application); Form2->Caption = Form3->Caption; Form3->ShowModal(); } 因為我的Form3裡面有資料要顯示...可是您的程式碼卻是開出一個空白的MDI Form ...
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-08-31 22:41:29 IP:203.70.xxx.xxx 未訂閱
抱歉....剛剛是我的錯    我已經將我的檔案傳上網路了...請大大幫我看一下到底是哪出了問題    http://kancewan.myweb.hinet.net/index.htm
nlj859
資深會員


發表:139
回覆:375
積分:322
註冊:2004-03-20

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-08-31 23:23:41 IP:219.80.xxx.xxx 未訂閱
Hello kancewang,    試著改成這樣子再run看看    1.Project->options->Form->Form3拉回"Auto-Create Form" 2.Unit1.cpp:
    #include 
#pragma hdrstop    #include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm1::Button3Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------    void __fastcall TForm1::Button2Click(TObject *Sender)
{
Form2->ShowModal();
}
3.Unit2.cpp:
#include 
#pragma hdrstop    #include "Unit2.h"
#include "Unit3.h"    //---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//TForm3 *Form3;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm2::ACOClick(TObject *Sender)
{
  //TForm *Form3;
  //Form3 = new TForm3(Application);
  //Form2->Caption = Form3->Caption;
  Form3->ShowModal();
}
Form2->Visible --> false 4.Form3->FormStyle-> 改回fsNormal Form3->Visible --> false
引言: 不好意思...我要在請教一個問題 因為我的Form2裡面的空白部分有放一個LOGO....那是原本置放的 經過大大跟我講解的改正方法後.....原本放置在Form2的LOGO在執行時.. 就不會顯示出來....能否請大大在幫我一下...謝謝
是不會有這種問題的,不妨先將Image移除, 再指定Image的Picture屬性加入圖片看看. 發表人 - nlj859 於 2004/09/01 00:12:18
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-08-31 23:46:13 IP:203.70.xxx.xxx 未訂閱
不好意思...我要在請教一個問題 因為我的Form2裡面的空白部分有放一個LOGO....那是原本置放的 經過大大跟我講解的改正方法後.....原本放置在Form2的LOGO在執行時.. 就不會顯示出來....能否請大大在幫我一下...謝謝
kancewang
一般會員


發表:6
回覆:14
積分:4
註冊:2004-05-24

發送簡訊給我
#10 引用回覆 回覆 發表時間:2004-09-01 01:10:20 IP:203.70.xxx.xxx 未訂閱
感謝兩位大大的幫忙..........問題已經解決....真的非常感謝你們
系統時間:2024-04-29 11:43:23
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!