Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Вниз

Меню и картинки   Найти похожие ветки 

 
James007   (2004-12-08 01:11) [0]

У меня вопрос: как можно в главном меню в подменю вставить картинку (например размером 100х100), типа preview-шки???
Заранее благодарен!


 
GuAV ©   (2004-12-08 01:15) [1]

TMenu.OwnerDraw
TMenuItem.OnDrawItem
TMenuItem.OnMeasureItem


 
James007   (2004-12-08 09:24) [2]

Картинка находится в определенном файле например photo.jpg (или photo.bmp)
А можно небольшой пример.
Заранее благодарен.


 
GuAV ©   (2004-12-08 13:14) [3]

mniPreview - элемент меню с назначеными обработчикаи OnDrawItem и OnMeasureItem, MainMenu.OvnerDraw = True.

procedure TForm1.mniPreviewMeasureItem(Sender: TObject; ACanvas: TCanvas;
 var Width, Height: Integer);
begin
 Width := 100;
 Height := 100;
end;

procedure TForm1.mniPreviewDrawItem(Sender: TObject; ACanvas: TCanvas;
 ARect: TRect; Selected: Boolean);
begin
 ACanvas.CopyRect(ARect, FBmp.Canvas, FBmp.Canvas.ClipRect);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 FBmp := TBitmap.Create;
 FBmp.LoadFromFile("D:\DOC\PROG\CLOUDS.BMP");
end;


 
James007   (2004-12-08 14:16) [4]

Не работает выдает ошибку "Access violation at adress 0041CD96"


 
James007   (2004-12-08 14:18) [5]

Не работает выдает ошибку "Access violation at adress 0041CD96"


 
GuAV ©   (2004-12-08 14:28) [6]

Form.OnCreate назначен ?
BMP файл существует ?
FBmp - поле формы или глобальная переменная ?



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

Форум: "Основная";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.037 c
8-1096363662
BALU1111
2004-09-28 13:27
2004.12.26
Построение поверхностей второго порядка в трехмерном пространстве


1-1102706736
kirilllius
2004-12-10 22:25
2004.12.26
Привязка ПО к CD


14-1102171935
sof_
2004-12-04 17:52
2004.12.26
IP адрес и доступ к дискам по сети


9-1093004228
Megabyte-Ceercop
2004-08-20 16:17
2004.12.26
Игра растет в памяти после каждого ГеймОвера


1-1102691955
Аня
2004-12-10 18:19
2004.12.26
конвертирование отчетов Rave





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский