Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Вниз

Frame   Найти похожие ветки 

 
Eduard   (2001-12-10 10:09) [0]

Добрый день !
У меня такой вот вопрос. При выборе одной из вкладок в PageControl в программе происходит следующее: она меняет размеры, и в определенное место главной формы вставляется фрейм. При этом форма на мгновение исчезает с экрана, т.е. видимо, перерисовывается. Как этого избежать, в смысле, как во время вставки фрейма запретить форме перерисовываться, чтобы все было красиво ?


 
Eduard   (2001-12-10 11:40) [1]

Эй !!!


 
Tonie   (2001-12-10 12:56) [2]

1.Как вставляешь, немного кода не помешало бы ...
2.Может поможет тебе Lockwindowupdate


 
Eduard   (2001-12-10 13:37) [3]

Туфта какая-то получается.

LockWindowUpdate(Form1.Handle);
Width := 970;
Position := poScreenCenter;
ActiveFrame := TToners.Create(Self);
ActiveFrame.Parent := Form1;
ActiveFrame.Visible := True;
ActiveFrame.Left := PageControl1.Width+1;
ActiveFrame.Top := Height - PageControl1.Height - StatusBar1.Height -1;
LockWindowUpdate(Form1.handle);


где TToners = class(TFrame)

Короче, с процедурой LockWindowUpdate еще хуже получается. Фрейм вообще не появляется, пока не попытаться сдвинуть форму.


 
Eduard   (2001-12-10 18:04) [4]

Help, блин !!!!


 
NA   (2001-12-10 18:33) [5]

Вообще, сильно так уж тебе это не поможет, пожалуй, но все-таки сначала разберись с размерами и положением компонента, а потом уже делай его видимым. Т.е. сначала LEFT\TOP, а только после этого VISIBLE.

Таки поаккуратней будет ;)


 
akaKot   (2001-12-18 20:30) [6]

Попробуй так:

...tusBar1.Height -1;
LockWindowUpdate(0);



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

Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
1-22056
Delphimun
2001-12-15 13:11
2002.01.08
Как создать ресурс с помощю brcc32.exe?


1-22058
$Hic0
2001-12-16 11:49
2002.01.08
TTreeView and TListView


1-22053
greenrul
2001-12-18 19:29
2002.01.08
АНТИАЛЬЯСИНГ для TTF шрифтов.


1-22130
Катерина
2001-12-20 07:37
2002.01.08
поможите ,люди добрые


1-22051
kay
2001-12-18 22:22
2002.01.08
RichEdit





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский