programma-emuljator

[Ieshka]

Zdrastvujte! Ja pyshu programmu-emuljator. Vstavljaju komponentu Image1 y Timer1 pyshu takoj programnyj kod: void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Image1->Picture->LoadFromFile("1.bmp");
Timer1->Interval=5000;
Image1->Picture->LoadFromFile("7.bmp");
}, no pry zapuske programmy mne vuvodutsja tolko poslednjaja kartynka. Posovetujte kak sdelat chtob vse kartynky vyvodylys.

[Hacker19_90]

А зачем интервал таймера менять?
Вам наверно надо программу "усыпить"! Тогда функция sleep(int)
Допустим так

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
Image1->Picture->LoadFromFile("1.bmp");
sleep(5000);
Image1->Picture->LoadFromFile("7.bmp");
}

[Ieshka]

Kogda ja pyshu takoj kod, to vseravno vyvodytsja tolko poslednjaja kartynka. Ja podkljuchala y byblyoteku dos.h, no eto nychego ne dajet. Probovala programyrovat Image takym sposobom kak vy napysaly, no togda vyvodytsja tolko pustoj ekran.

[counter]

наверное вам нужно выводить картинки по очереди?
тогда по срабатыванию таймера нужно получать новое имя файла либо из массива, ранее подготовленного, либо читать из файла...

void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
string str=GetFile(); // получаем строку с именем файла
Image1->Picture->LoadFromFile(str);
}

что-то типа этого... если я правильно понял