掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数等を外部ファイル化にあたり (ID:149962)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になります。 現在、関数を外部ファイル化し,外部でtmemoを更新しようと思い下記のようにしてみたのですが コントロールによっては可能な物もありましたがtmemoでは更新されません。 外部経由でmainフォームのtmemoに内容を代入するには どのような方法になりますでしょうか？ ------------------------------------------------ implementation uses outer_pas; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin ShowM(); end; ------------------------------------------------ outer_pas.pas ------------------------------------------------ unit outer_pas; interface uses Dialogs,StdCtrls,Forms; procedure ShowM(); implementation procedure ShowM(); var tm:tmemo; frm1:tform; begin tm:= TMemo(frm1.FindComponent('memo1')); showmessage(tm.text); tm.text:='xxxxxxxxx'; end; end.
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.