名前
題名
▼ Mr.XRAYさん > ▼ igyさん > > > TForm1 = class(TForm) > > Button1: TButton; > > Panel1: TPanel; > > Button2: TButton; > > procedure Button1Click(Sender: TObject); > > procedure Button2Click(Sender: TObject); > > procedure MyEvent(Sender: TObject); // <===== ここに移動 > > private > > なるほど，これなら RTTI のテーブルにのりますね． > 確認しました． > RTTI にのれば何でもやり放題 !!
GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.
600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示).
(上限122000(120k)バイト)

削除キー Link