Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

Користувався хто небудь функцією PaintTo для промальовування WinControl ів на кинувся бітмепа? Допоможіть! У мене нічого не виходить. Знайти схожі гілки


Kost   (2001-12-14 14:10) [0]

Користувався хто небудь функцією PaintTo для промальовування WinControl "ов на кинувся бітмепа? Допоможіть! У мене нічого не виходить.



valery_f   (2001-12-14 18:16) [1]

Пользовался. Единственное "но" - изначально невидимый WinControl не имеет хэндла и дает эксэпшн при PaintTo. Если это свой компонент - зови CreateHandle, если нет - сделай его видимым потом спрячь - хэндл появится и PaintTo заработает.



DK   (2001-12-15 03:52) [2]

2valery_f
Можно вопрос:
Как это? Контрол есть, а хэндла нет. Разве такое может быть?



Kost   (2001-12-15 13:05) [3]

Є форма TForm1. На неї поміщена "піддослідна кнопка" BitBtn1.
Є бажання, після натискання на іншу кнопку - Button1 зробити наступне:
- намалювати зображення BitBtn1 на кинувся бітмепа за допомогою PaintTo
- вивести отриманий бітмеп на канву форми

НЕ ВИХОДИТЬ! BitBtn1 НЕ малюється в бітмеп! ЧОМУ! ДЕ Я НЕ ПРАВ?

procedure TForm1.FormCreate (Sender: TObject);
починати
// Створюємо бітмеп
bmp: = TBitmap.Create;
bmp.Width: = 150;
bmp.Height: = 150;
end;

procedure TForm1.Button1Click (Sender: TObject);
починати
// При натисканні на кнопку малюємо BitBtn1 на кинувся бітмепа
BitBtn1.PaintTo (bmp.Canvas.Handle, 0, 0);
Invalidate; // Щоб викликати перемальовування форми
end;

procedure TForm1.FormPaint (Sender: TObject);
починати
// Виводимо на канву форми бітмеп
Canvas.Draw (0,0, bmp);
end;



DK   (2001-12-16 02:26) [4]

Всё работает!!!
Может ты просто не обрабатываешь нажатие на кнопку?
procedure TForm1. Button1Click(Sender: TObject);
procedure TForm1. BitBtn1Click(Sender: TObject);



Kost   (2001-12-16 12:12) [5]

И, все таки, не работает. Кнопка в битмэп не рисуется. TPanel рисуется а TButton и TBitBtn нет.



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.83 MB
Час: 0.036 c
1-22231
Левіафан
2001-12-16 22:16
2002.01.08
BitBlt ...


1-22224
Oleg Gashev
2001-12-15 11:14
2002.01.08
Проблемми з розмірами картинки при роздруківці


1-22220
Кандиль
2001-12-16 15:10
2002.01.08
Як заборонити видаляти будь-яку папку, що не висячи в треї?


4-22500
YUS
2001-11-06 20:32
2002.01.08
Координати іконок на робочому столі


4-22488
Arick
2001-10-31 09:20
2002.01.08
як дізнатися ім'я завантаженої Dll





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська