Вниз
Скачать: CL | DM;

Проблема с TFrame   Найти похожие ветки 

 
Ksenom   (2006-02-10 09:29) [0]

Вот такая проблемка появилась. Мне необходимо на форме создавать и размещать Frames.
Я это делаю так.
….
type
   TFr = record
   Frame :TFrame;
   St    :Boolean;
end;
…..
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
 if Form1.SpeedButton1.Down
 then begin //Добавление фрейма
   if Form1.Fr.St then Form1.Fr.Frame.Free;
   Form1.Fr.Frame:=TFrame1.Create(Form1.Panel3);
   Form1.Panel3.InsertControl(Fr.Frame);
   Form1.Fr.St:=true;
 end
 else begin //уничтожение фрейма
   Form1.Fr.Frame.Free;
   Form1.Fr.St:=false;
 end;
end;
…..

По началу всё прекрасно, фреймы появляются и исчезают но тут возникла проблема. Стоит мне на фрейме разместить любой нестандартный элемент (компонент не входящий в стандартную поставку) и фреймы перестают отображаться. Они создаются и по свойствам вроде как должны быть видны на форме но их нет.
Если просто мышкой фрейм разместить на форме то он отображается нормально.

Как с этим бороться?


 
DesWind ©   (2006-02-10 13:11) [1]

А если явно присвоить Frame.Parent:=Panel3 ?


 
аноним   (2006-02-25 10:57) [2]

идентичная проблема. автор разобрался? помогите. сам в шоке )
имеет ли смысл отказываться от фреймов и работать с обычными формами? ведь по сути форму тоже можно загнать а-ля фрейм. кто разобрался с бубном?


 
Alkid ©   (2006-02-25 14:27) [3]

Во-первых, форму нельзя разместить на другой форме как фрэйм.
Во-вторых я достаточно много работал с динамически размещаемыми на
форме фрэймами, содержжащими самые экзотические контролы. У меня всё
работало. Фрэймы клал на форму путём назначения парента типа:
Frame1.Parent := Form1;

Проверь следующее:
1. Что фрэйм точно имеет Visible == true
2. Размеры и расположение фрэйма.
3. Попробуй тот же фрэйм положить на форму статически и посмотреть, будет
либо отображаться с твоими нестандартными контролами.
4. Измени порядок положения фрэйма на форму с ...InsertControl на Frame.Parent := Form.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c
2-1140324620
VitalikS
2006-02-19 07:50
2006.03.12
Автоинкримент


15-1139943369
-Dfcz-
2006-02-14 21:56
2006.03.12
Delphi 2006


15-1140180610
Manic Mechanic
2006-02-17 15:50
2006.03.12
горе от ума


15-1139949571
ArtemESC
2006-02-14 23:39
2006.03.12
Форумы...


8-1128001314
X-Disa
2005-09-29 17:41
2006.03.12
Нормальный звук через системный динамик




   Наверх