Ваш ключ: необходима авторизация | MyProxy - бесплатный обменник валидных прокси между пользователями форума.

[Урок #4] Одномерные массивы

Тема в разделе Delphi, создана пользователем #Light, 11 июн 2016.

Войдите для ответа
  1. #Light Заблокирован

    #Light
    Статус:
    Вне сети
    Сообщения:
    316
    Симпатии:
    0
    Регистрация:
    01.06.15
    Добрый вечер друзья, я бы хотел рассказать вам как сделать прозрачную форму в Delphi.

    Синтаксис:

    var имя массива: array[интервал] of тип;
    Теперь открываем Delphi и кидаем на форму компонент Button, Label и Memo. Компонент Memo находится на 6месте на вкладке Standard.

    Сотрите всё, что написано в редакторе и создайте событие OnClick на кнопке. Объявим массив с именем mas, интервалом от 1 до 3 и типом string. Да, и еще нам нужно объявить переменную i типа integer, она нам пригодиться позже.
    procedure TForm1.Button1Click(Sender: TObject);
    var mas: array[1..3] of string;
    i:integer;
    begin
    
    Сейчас запишем в наши воображаемые вагоны массива значения:
    mas[1]:='Первая строка';
    mas[2]:='Вторая строка';
    mas[3]:='Третья строка';
    А сейчас выводим второй элемент массива в Label и все 3 элемента в Memo.

    В лабел:
    Label1.Caption:=mas[2];
    Теперь, для того чтобы вывести все 3 значения в Memo, нужно воспользоваться циклом For:
    for i:=1 to 3 do
    Memo1.Lines.Add(mas[i]);
    Так как в теле цикла выполняется всего одна строка, то можно опустить ключевые слова begin и end.
    Строка Memo1.Lines.Add(mas); при первом круге цикла добавит в memo первый элемент массива, так как переменная i равна 1. При втором круге переменная i равна 2 и строка Memo1.Lines.Add(mas); добавит второй элемент массива. Точно так же и с третьим.
     
    11 июн 2016 #1
    GodWin нравится это.
Загрузка...
Похожие темы
  1. #Light
    Ответов:
    0
    Просмотров:
    95
  2. #Light
    Ответов:
    0
    Просмотров:
    109
  3. #Light
    Ответов:
    0
    Просмотров:
    99
  4. #Light
    Ответов:
    0
    Просмотров:
    94
  5. #Light
    Ответов:
    0
    Просмотров:
    108
Top