информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Страшный баг в WindowsSpanning Tree Protocol: недокументированное применениеСетевые кракеры и правда о деле Левина
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 Очередное исследование 19 миллиардов... 
 Оптимизация ввода-вывода как инструмент... 
 Зловреды выбирают Lisp и Delphi 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
если вы видите этот текст, отключите в настройках форума использование JavaScript
ФОРУМ
все доски
FAQ
IRC
новые сообщения
site updates
guestbook
beginners
sysadmin
programming
operating systems
theory
web building
software
hardware
networking
law
hacking
gadgets
job
dnet
humor
miscellaneous
scrap
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
[Delphi] а как сделать это?... помогите... 12.03.02 14:28  
Автор: WingGod Статус: Незарегистрированный пользователь
<"чистая" ссылка>
вощем вопрос банален: как программно создать компонент TIMage, я все делаю как и для остальных компонентов, а он не создается...:( (допустим Tbutton, Tform могу создать )

Зы: тока не надо говорить что лучше пользоваться канвасом или Тбитмапом...я это знаю, но нужен имеено TImage
[Delphi] а как сделать это?... помогите... 12.03.02 14:41  
Автор: Lz Статус: Незарегистрированный пользователь
<"чистая" ссылка>
> вощем вопрос банален: как программно создать компонент
> TIMage, я все делаю как и для остальных компонентов, а он
> не создается...:( (допустим Tbutton, Tform могу создать )
>
> Зы: тока не надо говорить что лучше пользоваться канвасом
> или Тбитмапом...я это знаю, но нужен имеено TImage

интересно, а какая разница в создании ?
Вот что написал - никаких проблем не возникло.
Может ты TPanel используешь и присваиваешь не тот Parent ?
procedure TForm1.Button1Click(Sender: TObject);
var
Image: TImage;
begin
Image := TImage.Create(Self);
Image.Parent := Self;
Image.AutoSize := True;
Image.Picture.LoadFromFile('d:\26619b.jpg');
end;
[Delphi] а как сделать это?... помогите... 12.03.02 21:42  
Автор: Phantom_Stalker Статус: Незарегистрированный пользователь
<"чистая" ссылка>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> Image: TImage;
> begin
> Image := TImage.Create(Self);
> Image.Parent := Self;
> Image.AutoSize := True;
> Image.Picture.LoadFromFile('d:\26619b.jpg');
> end;

Можно также обойтись без объявления переменных:

begin
with TImage.Create(Self) do
begin
Image.Parent := {напиши имя формы на которую помещаешь TIMAGE};
Image.name:="SuperImage";
Image.AutoSize := True;
Image.Picture.LoadFromFile('d:\26619b.jpg');
end;
end;

Теперь можешь обращаться к картинке из любой части программы, используя объект SuperImage ;-)
1




Rambler's Top100
Рейтинг@Mail.ru


  Copyright © 2001-2025 Dmitry Leonov   Page build time: 0 s   Design: Vadim Derkach