Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка в GetBitmapDimensionEx. [D6, XP]

Страницы: 1 2 >
Б © (2009-07-26 23:57:00)
Function Load(const FileName: string): boolean; Var Size: TSize; Bmp: HBITMAP; begin Bmp:= LoadImage(0, PChar(FileName), IMAGE_BITMAP, 0, 0, LR_LOADFROMFILE or LR_CREATEDIBSECTION); If not GetBitmapDimensionEx(Bmp, Size) then begin Result:= False; Exit; end; . . . . .

В итоге Size.cx и Size.cy, всегда по-нулям. Почему?

Palladin (2009-07-27 15:07:00) [1]
См. TBitmap.ReadDIB в graphics.pas

Б (2009-07-27 15:00:00) [2]

> Ну теперь ссылка на [21] и по круну

> Б (27.07.09 13:37) [23]
>
> > зы у дескриптора нет ширины и высоты... это грубо говоря
>
> > ссылка на что-то...
>
>
> Это понятно. Вот мне нужна функция, которая извлекает их.
>

Anatoly Podgoretsky (2009-07-27 14:56:00) [3]
Ну теперь ссылка на [21] и по круну

Б (2009-07-27 13:37:00) [4]

> зы у дескриптора нет ширины и высоты... это грубо говоря
> ссылка на что-то...

Это понятно. Вот мне нужна функция, которая извлекает их.

> его размер тебе сказали в [5]

А это что?

> Б (27.07.09 09:57) [6]

brother (2009-07-27 13:31:00) [5]
> размеры дескриптора изображения

его размер тебе сказали в [5]

brother (2009-07-27 13:30:00) [6]
зы у дескриптора нет ширины и высоты... это грубо говоря ссылка на что-то...

brother (2009-07-27 13:29:00) [7]
> размеры дескриптора изображения.

я не знаю, что ты имеещь под этим ввиду...
я привел свой вариант видиния этого... на этом я откланиваюсь...

Б (2009-07-27 13:27:00) [8]
И как в [11] узнать?:

> Б (27.07.09 00:09) [2]
> Мне нужно получить размеры дескриптора изображения.

Б (2009-07-27 13:27:00) [9]
И как в [11] узнать:

> Б (27.07.09 00:09) [2]
> Мне нужно получить размеры дескриптора изображения.

brother (2009-07-27 13:24:00) [10]
что не понятно в [11]?

Б (2009-07-27 13:23:00) [11]
зы а телепатор мой в отпуске
Что не понятно? [10]-?

brother (2009-07-27 13:19:00) [12]
в начинающих, чего только не было... и велосипеды изобретают и на API реализуют многоэтажным кодом (из инета) то, что реализуется в пару строк... дык ой...
зы а телепатор мой в отпуске

Б (2009-07-27 13:16:00) [13]

> ты об этом в ТЗ не говорил

Если было бы так просто, я б не срашивал. Да и по коду видно, что используется чистый API.

brother (2009-07-27 13:08:00) [14]
> Мне надо на чистом WinAPI.

ты об этом в ТЗ не говорил

Б (2009-07-27 13:07:00) [15]

> brother © (27.07.09 13:03) [11]

Не, ну это понятно.
Мне надо на чистом WinAPI.

brother (2009-07-27 13:03:00) [16]
procedure TForm1.Button1Click(Sender: TObject);
var bmp: TBitmap;
begin
memo1.Lines.Clear;
bmp:= TBitmap.Create;
with bmp do
try
bmp.LoadFromFile('c:\1.bmp');
memo1.Lines.Add(inttostr(bmp.Width)+'x'+inttostr(bmp.Height));
finally
bmp.Free;
end;
end;

Б (2009-07-27 12:55:00) [17]

> дескриптора? О_о или изображения?)

Дескриптора изображения - HBITMAP.

> тебе просто ширину и высоту узнать надо и все?

Да.
Остальные данные не интересуют.

brother (2009-07-27 10:18:00) [18]
тебе просто ширину и высоту узнать надо и все?

brother (2009-07-27 10:05:00) [19]
> Не. Мне нужен не размер дескриптора в байтах, а его размерЫ:
> ширина и высота.

дескриптора? О_о или изображения?)

Palladin (2009-07-27 09:58:00) [20]
Ну это зависит от того каким шрифтом его выводить

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »