Автор Elen задал вопрос в разделе Компьютеры, Связь
Вывод массива в Делфи и получил лучший ответ
Ответ от Ёергей Фетисов[гуру]
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids;type TForm1 = class(TForm) StringGrid1: TStringGrid; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;const ARRAY_SIZE = 10;var Form1: TForm1; Data: array[0..ARRAY_SIZE-1] of Integer;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);var I: Integer;begin Randomize; StringGrid1.FixedCols:=0; StringGrid1.RowCount:=2; StringGrid1.ColCount:=ARRAY_SIZE; for I:=0 to ARRAY_SIZE-1 do begin Data:=Random(1000); StringGrid1.Cells[I, 0]:='cell '+IntToStr(I); StringGrid1.Cells[I, 1]:=IntToStr(Data); end;end;end.
interfaceconst RAZMER_MASSIVA=10varMASSIV: array [1..RAZMER_MASSIVA] of Integer;implementationprocedure FillMassiv;var i: byte;beginfor i:=1 to RAZMER_MASSIVA do MASSIV[ \i ]:= Random(100);end;end;pr
neznayu
Реализовать в Delphi организацию работы СТЕКА.
Ну как минимум стараться передавать в процедуры и функции не переменные а указатели на них... в
подробнее...
Есть ли в Delphi команда для обнуления всех элементов в массиве?
Доброго времени суток.
Шестьдесят две с половиной тыщи итераций не должны вешать комп.
подробнее...
как перевести строку в массив
Всю строку как 1 элемент массива, или каждый символ строки как отдельный элемент?
подробнее...
Как в паскале посчитать сколько в массиве элементов?
Доброго времени суток.
Вы можете узнать только минимальное и максимальное значение индекса с
подробнее...
Как из массива удалить элемент?
Судя по твоим предыдущим вопросам, язык Паскаль. Ну так вот, для обычного массива это невозможно.
подробнее...
Может ли функция в PHP вернуть несколько значений ?
Функции в ПХП возвращают только одно значение. Но можно вернуть несколько значение при помощи
подробнее...
Что означают типы данных в Delphi 7? как и где их исползовать?
Delphi - это объектно-ориентированный язык со строгой типизацией. Поэтому типы в Delphi - это все.
подробнее...
Подскажите как рисовать в Delphi методом Canvas
Доброго времени суток.
Начнем с того, что Canvas не метод, а свойство некоторых
подробнее...
как записать в Delphi (символ в строке под номером X заменить на символ Y)?
Строка - массив символов. Поэтому
S[X]:=Y;
При этом необходимо самостоятельно следить за
подробнее...
Как задать массив в Delphi?
<название>:array[размерность] of <тип>
Например: m:array[1..5000] of integer -
подробнее...
Как в Delphi программно задать формат конкретных ячеек в Excel?
различные числа меняет на 64? мне кажется проблема в XLArrayData а не в Excel. Содержимое этого
подробнее...
ошибка Menu index out of range; перевод ошибка Индекс меню из диапазона. Как иё исправить?
1)В какой среде работаешь?
Зачастую такая ошибка бывает из за того что ты обращаешься в
подробнее...
Помогите с типом поинтер в Delphi
Эмм... А зачем, собственно, ты используешь такой жестокий дженерик, как Pointer? В этом случае
подробнее...