請問各位大大，我以於popupmenu裡建立好一個"開啟"裡面有三個子選項"A","B","C"，並且我設"A","B","C"的tag為70,71,72，並開啟autocheck，我該怎麼於formCreate裡，下指令讓他在我第一次按右鍵看裡面的選項時，"開啟"裡的"A"及"B"就以經被勾選了呢?謝謝~~~ ※不能於屬性表裡設定checked哦，因為我是要載入(true或false)讓他去改變的，謝謝~~ 發表人 - lcc1299 於 2004/09/26 23:32:23

lcc1299 您好：    底下有段程式碼，不知是否符合您的需求？您且參考看看。 <>< class="code">type TForm1 = class(TForm) PopupMenu1: TPopupMenu; A1: TMenuItem; B1: TMenuItem; C1: TMenuItem; Button1: TButton; Memo1: TMemo; procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin Memo1.Lines.LoadFromFile('state.txt'); if ( Memo1.Lines.Values['A1']='true' ) then A1.Checked := true; if ( Memo1.Lines.Values['B1']='true' ) then B1.Checked := true; if ( Memo1.Lines.Values['C1']='true' ) then C1.Checked := true; end; //============================================== // state.txt 檔案內容如下： A1=false B1=false C1=true RichTop 敬上 =====***** 把數學當工具，可以解決問題；將數學變能力，能夠發現並解決問題！ =====#####