Имя пользователя:
Пароль:
 

Название темы: Delphi 5
Показать сообщение отдельно

Пользователь


Сообщения: 86
Благодарности: 0

Профиль | Отправить PM | Цитировать


Display :=form1;
displayrect:=rect(bevel1.left +4, bevel1.top +4,0,0);
bevel1.width:=displayrect.right +8;
bevel1.height :=displayrect.bottom +8;
IF bevel1.height = 8 THEN
* self.clientheight:=bevel1.top
ELSE
* self.clientheight:=bevel1.height + bevel1.top + 8;

-------
У вас не виснет Windows ?!! Руки кривые ... :)


Отправлено: 00:37, 21-05-2003 | #4

Название темы: Delphi 5