информационная безопасность
без паники и всерьез
 подробно о проектеRambler's Top100
Страшный баг в WindowsАтака на Internet
BugTraq.Ru
Русский BugTraq
 Анализ криптографических сетевых... 
 Модель надежности двухузлового... 
 Специальные марковские модели надежности... 
 700 с лишним git-серверов пострадало... 
 От повторного пришествия Шаи-Хулуда... 
 Крупный сбой Azure и других сервисов... 
главная обзор RSN блог библиотека закон бред форум dnet о проекте
bugtraq.ru / форум / programming
Имя Пароль
ФОРУМ
если вы видите этот текст, отключите в настройках форума использование JavaScript
регистрация





Легенда:
  новое сообщение
  закрытая нитка
  новое сообщение
  в закрытой нитке
  старое сообщение
  • Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
  • Новичкам также крайне полезно ознакомиться с данным документом.
[Delphi] а как сделать это?... помогите... 12.03.02 21:42  Число просмотров: 973
Автор: 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 ;-)
<programming>
[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