Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.12.2009, 20:11   #1
Ckomoroh
Я еще только учусь
Форумчанин
 
Аватар для Ckomoroh
 
Регистрация: 24.10.2009
Сообщений: 125
По умолчанию Не видны элементы массива из ТImage.

Написал программу где содержится картиночный массив.
В событии создания формы я им всем присваиваю один и тот же рисунок, но на экране они размещаются в разных координатах...
Загвоздка в том, что почему-то эти картинки не видны на форме =(

Вот код:
Код:
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, StdCtrls;

type
  TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    vrag:array[1..3] of TImage;
  end;

  var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var
i:integer;
begin
  i:=0;
   for i:=1 to 3 do
     begin
       randomize;
       vrag[i]:=TImage.Create(Application);
       vrag[i].Visible:=true;
       vrag[i].Stretch:=true;
       vrag[i].Height:=50;
       vrag[i].Width:=50;
       vrag[i].Top:=form1.Height div 2+i*50;
       vrag[i].Left:=form1.Width div 2+i*50;
       vrag[i].Picture.LoadFromFile('pic.bmp');
     end;
end;

end.
Подскажите в чем ошибка.
Заранее благодарен.
Ckomoroh вне форума Ответить с цитированием
Старый 03.12.2009, 20:18   #2
Daramant
Форумчанин
 
Регистрация: 06.01.2009
Сообщений: 340
По умолчанию

Ты забыл это:
Код:
vrag[i].Parent := <имя формы(или другого контейнера)>;
Истинный успех – это то, что Вы сделали в сравнении с тем, что могли бы сделать.
Никогда не бойся делать то, что ты не умеешь. Помни, ковчег был построен любителем. Профессионалы построили "Титаник".
Daramant вне форума Ответить с цитированием
Старый 03.12.2009, 20:32   #3
Ckomoroh
Я еще только учусь
Форумчанин
 
Аватар для Ckomoroh
 
Регистрация: 24.10.2009
Сообщений: 125
По умолчанию

Спасибо. исправил
Ckomoroh вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
1.Найти в матрице первую строку, все элементы которой отрицательны 2.отсортировать элементы массива по в w0lf16 Помощь студентам 2 22.11.2009 15:47
Элементы массива Ximer Паскаль, Turbo Pascal, PascalABC.NET 5 26.04.2009 00:53
Элементы массива в листбокс KiDoki Общие вопросы Delphi 4 07.10.2008 18:05
Повторяющиеся элементы массива Stanislav Общие вопросы Delphi 10 23.05.2008 12:31
переписать из массива в линейный двунаправленный список чётные элементы массива Black_Ak24 Помощь студентам 12 08.01.2008 00:44