Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
ВнизЗначение свойства Top, Left Найти похожие ветки
← →
Baboshkin (2002-11-13 16:27) [0]Уважаемые мастера, помогите разобраться, пожалуйста!
Свойства Top и Left из TControl типа integer
(по справочнику - 32-битное в Delphi 5),
но реально устанавливается как 16-битное, не более (+/-)32767
← →
F1 (2002-11-13 16:35) [1]Это ты с чего взял???
Button1.Left:=64000;
Button1.Caption:=IntToStr(Button1.Left);
Надпись после этого 64000!!!
PS А зачем так много? В среднем разрешение монитора 1024*768. :)
← →
Кот Бегемот (2002-11-13 16:45) [2]Припустим это так - имеем 32 тыс. точек :)
Даже при разрешении в 1200 дпи ты получишь до 30 дюймов смещения :-\
На какой интересно формат ты выводишь ???
← →
F1 (2002-11-13 16:49) [3]Карту мира в натуральную величину :))
← →
Игорь Шевченко (2002-11-13 17:17) [4]
> Baboshkin (13.11.02 16:27)
> Уважаемые мастера, помогите разобраться, пожалуйста!
> Свойства Top и Left из TControl типа integer
> (по справочнику - 32-битное в Delphi 5),
> но реально устанавливается как 16-битное, не более (+/-)32767
Совместимость с 16-битной Windows. Об этом в MSDN написано.
← →
Baboshkin (2002-11-13 17:17) [5]Я сделал по образцу
Button1.Left:=64000;
Button1.Caption:=IntToStr(Button1.Left);
Надпись после этого 32767 !
Может какие-то опции нужно установить?
← →
F1 (2002-11-13 17:18) [6]>Игорь Шевченко © (13.11.02 17:17)
А как насчет
Button1.Left:=64000;
Button1.Caption:=IntToStr(Button1.Left);
Надпись после этого 64000!!!
← →
Игорь Шевченко (2002-11-13 17:31) [7]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button2Click(Sender: TObject);
begin
Button1.Left := 64000;
ShowMessageFmt("Button1.Left = %d", [Button1.Left]);
end;
end.
Э....32767 выводится...
← →
Baboshkin (2002-11-13 17:47) [8]Уважаемые мастера, дайте дельный совет, пожалуйста,
как мне установить Top(Left)>32767 ??
← →
TTCustomDelphiMaster (2002-11-13 17:53) [9]Baboshkin
Так вы толково объясните зачем это вам, тогда и совет можно будет дать.
← →
F1 (2002-11-13 17:59) [10]>Игорь Шевченко © (13.11.02 17:31)
А у меня 64000!!! Серьезно! Что за хрень???
← →
Sectey (2002-11-13 18:09) [11]Повтарил код Игорь Шевченко один в один у меня -1536 еще веселее :)))
← →
AlexT1000 (2002-11-13 18:13) [12]а никак ты не установишь.
← →
Игорь Шевченко (2002-11-13 18:16) [13]F1 © (13.11.02 17:59)
D5, WinNT 4.0
← →
Baboshkin (2002-11-13 18:57) [14]PIII-800
W2000
D5
Создаю паспорт объекта, содержащий большое множество
разных визуальных компонентов.
Top почему-то не хочет быть > 32767
ПОЧЕМУ ?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.011 c