モナーの *やさしい* Delphi質問スレ Ver3
■ このスレッドは過去ログ倉庫に格納されています
0682デフォルトの名無しさん
NGNGprocedure CompoFalse(PanelName:String);
for idx:=0 to Screen.ActiveControl.ComponentCount -1 do
begin
if (Screen.ActiveControl.Components[idx].Owner.Name = PanelName) then
TWinControl(Screen.ActiveControl.Components[idx]).Enabled:=False;
end;
end;
こんな感じでやると、Owner.Nameの部分でフォーム名しか取り出せない、
このパネルの上に乗ってる!ってのは何処で知れば良いのでしょうか?
Parent.Name使えば出来るかな?と思ったけど、Components[nn]じゃ
駄目みたいなんでよくわかりませんでした。
■ このスレッドは過去ログ倉庫に格納されています