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

Вниз

Как узнать высоту Task Bar’а?   Найти похожие ветки 

 
Milg   (2002-06-05 14:53) [0]

Как узнать высоту Task Bar’а?


 
Игорь Шевченко ©   (2002-06-05 15:06) [1]

В FAQ пора.

ShAppBarMessage


 
Milg   (2002-06-05 15:51) [2]

Смотрел - нету!
Пример можна, пожалуйста?!


 
Игорь Шевченко ©   (2002-06-05 16:13) [3]

implementation
uses
Shellapi;

{$R *.DFM}

procedure TfMain.Button1Click(Sender: TObject);
var Appbar : TAppbarData;
begin
Appbar.cbSize := SizeOf(AppBar);
ShAppbarMessage(ABM_GETTASKBARPOS, AppBar);
ShowMessageFmt("Высота таскбара = %d", [Appbar.rc.bottom - Appbar.rc.top]);
end;



 
Milg   (2002-06-05 16:26) [4]

Спасибо!


 
Игорь Шевченко ©   (2002-06-05 16:35) [5]

Только я не понимаю, зачем это надо?
А если Taskbar будет справа или слева ?

есть возможность получить размер рабочей области экрана:

var
WorkArea : TRect;
begin
SystemParametersInfo(SPI_GETWORKAREA,0,Pointer(@WorkArea),0);
{ высота рабочей области: Workarea.Bottom - Workarea.Top }
{ ширина рабочей области: Workarea.Right - Workarea.Left }
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
14-55317
Dima Dubovik
2002-05-17 02:25
2002.06.17
Народ, кто знает где можно найти компоненты, модули(ДЕЛФИ)?


3-55047
Blondin
2002-05-24 14:12
2002.06.17
Подключение к Ораклу


7-55331
skovorodka
2002-03-16 15:38
2002.06.17
Гду найти RxTrayIcon ?? или как по-другому засунуть программу в трей ?


3-55043
nedden
2002-05-23 16:41
2002.06.17
Тормозит ClientDataSet+DataSource+Grid


1-55165
Redhot
2002-06-04 15:33
2002.06.17
Как в Tstringlist’е отобразить список файлов из директории?