Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.25;
Скачать: CL | DM;

Вниз

Размер   Найти похожие ветки 

 
Ivolg   (2004-07-08 15:36) [0]

Здрасти. Можно-ли узнать размер окна папки: D:\Test и потом сменить его. СПАСИБО!!!!!!!


 
MBo ©   (2004-07-08 15:40) [1]

что за бред?


 
ssk ©   (2004-07-08 15:43) [2]

MSDN: ->  GetWindowInfo, SetWindowPos


 
Семен Сорокин ©   (2004-07-08 15:44) [3]


> Ivolg   (08.07.04 15:36)  
> Здрасти. Можно-ли узнать размер окна папки: D:\Test и потом
> сменить его. СПАСИБО!!!!!!!

так окна или папки?


 
Palladin ©   (2004-07-08 15:45) [4]

монитора...


 
Ivolg   (2004-07-08 15:47) [5]

Семен Сорокин

ДА


 
ssk ©   (2004-07-08 15:48) [6]

>монитора...

:-)


 
Palladin ©   (2004-07-08 15:49) [7]


> Семен Сорокин
>
> ДА

:))))))


 
Семен Сорокин ©   (2004-07-08 15:49) [8]


> Ivolg   (08.07.04 15:47) [5]
> Семен Сорокин
>
> ДА

что ДА?

:))


 
Ivolg   (2004-07-08 15:49) [9]

Дайте пожалуйсто Пример!!!!!


 
ssk ©   (2004-07-08 15:50) [10]

:))


 
Ivolg   (2004-07-08 15:50) [11]

Семен Сорокин

Что мне надо узнать размер окна Папки


 
Ivolg   (2004-07-08 15:58) [12]

Что ни кто незнает?


 
Palladin ©   (2004-07-08 15:59) [13]

Неа... вопрос сложный очень...


 
КаПиБаРа ©   (2004-07-08 16:13) [14]


> Что ни кто незнает?


Бил знает. Он форточки придумал.


 
ssk ©   (2004-07-08 16:20) [15]

автору ветки: вот держи пару процедур.

первая возвращает размеры окна.
вторая изменяет размер.


procedure VzatRazmerOkna(WND: HWND; var xSize, ySize: integer);
var
 R: TRECT;
begin
 GetWindowRect(WND, R);
 with R do begin
   xSize:=Right-Left;
   ySize:=Bottom-Top;
 end;
end;

procedure UstanovitRazmeriOkna(WND: HWND; Sleva, Sverhu, Shirina, Visota: integer);
begin
 SetWindowPos(WND, 0, Sleva, Sverhu, Shirina, Visota, 0);
end;


если и после этого будут вопросы...


 
Rem   (2004-07-08 17:03) [16]

2 ssk
 У него будут! Это точно! Например, "что такое WND, HWND?", и "что такое уСизе и хСизе?"
 А, вот еще: "TRECT - зачем мне этот трест нужен?" :)

2 Ivolg
 Напиши функции:
   function GetFolderWindowSize(AFolder: string): TFolderSize;
   procedure SetFolderWindowSize(AFolder: string; ASize: TFolderSize);


 
ssk ©   (2004-07-08 17:07) [17]

>Rem

:-) да, я как-то сразу не подумал...  учту в следующей версии.


 
clickmaker ©   (2004-07-08 18:20) [18]


> Ivolg   (08.07.04 15:36)  
> Здрасти. Можно-ли узнать размер окна папки: D:\Test

1. Открыть D:\Test
2. Alt+Print Scrn
3. Запустить Paint
4. Ctrl + V
5. Меню "Рисунок-Атрибуты", ширина, высота


 
Игорь Шевченко ©   (2004-07-08 18:22) [19]

clickmaker ©   (08.07.04 18:20)

Хитер :)


 
IceBeerg ©   (2004-07-08 18:37) [20]

ЛюююДиии!!! А как узнать размер окна папки С:\Test, в процедуре писать вместо HWD:HWND HWC:HWNC и где килобайты брать!!!
8)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))



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

Текущий архив: 2004.07.25;
Скачать: CL | DM;

Наверх




Память: 0.51 MB
Время: 0.045 c
14-1088743781
MBo
2004-07-02 08:49
2004.07.25
Пятница - не сломай головы ;^)


1-1089705911
half_litre
2004-07-13 12:05
2004.07.25
Hint в формах из dll


1-1089440576
~ShamaN~
2004-07-10 10:22
2004.07.25
Защита листа Excel


14-1088952154
SPeller
2004-07-04 18:42
2004.07.25
Глупость?


8-1084264983
Morgan128
2004-05-11 12:43
2004.07.25
HELP! Сигнатуры