Головна сторінка
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.57 MB
Час: 0.064 c
3-21963
szap
2001-12-05 11:53
2002.01.08
Швидкість


14-22324
Yuraz
2001-11-04 11:37
2002.01.08
Географія по IP


1-22042
Angel S
2001-12-15 23:04
2002.01.08
Завантаження файлу JPG в Image


14-22343
Кречет
2001-11-02 14:17
2002.01.08
Зі сміху мало не впав на підлогу!


1-22114
Aleksandr
2001-12-19 19:28
2002.01.08
Як зібрати колір з номера і яскравості?





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