Дистанционная подготовка: кеыувпмиеу5нп
кеыувпмиеу5нп
от Динар Гайнуллин - Пятница 21 Февраль 2020, 07:51
112491. Моделирование стека
 
procedure Form1.toolStripMenuItem3_Click(sender: Object; e:
EventArgs);
begin
// это пункт открыть
end;
procedure Form1.toolStripMenuItem4_Click(sender: Object; e:
EventArgs);
begin
// это пункт сохранить
end;

procedure Form1.toolStripMenuItem6_Click(sender: Object; e: EventArgs);
begin
  pictureBox1.Image := Image.FromFile('Ris1.jpg');
end;

procedure Form1.toolStripMenuItem7_Click(sender: Object; e: EventArgs);
begin
  pictureBox1.Image := Image.FromFile('Ris2.jpg');
end;

procedure Form1.toolStripMenuItem8_Click(sender: Object; e: EventArgs);
begin
  pictureBox1.Image := Image.FromFile('Ris3.jpg');
end;