| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Заполнение StringGrid [D7, WinXP]
S.[ace] © (2008-06-08 17:20:00)Увадаемые мачтера Delphi у меня возник вопрос: Как можно заполнить StrinGgrid записями построчно в случайном порядке?? Заранее благодарен...
Германн (2008-06-09 01:09:00) [21]
> Anatoly Podgoretsky © (08.06.08 20:46) [11]
>
> > alex-drob (08.06.2008 19:20:04) [4]
>
> А ни как построчно у него не получится, даже если заполнять
> подготовленую строку, то как минимум ее придется заполнять
> по ячеечно.
>
Хм. А свойство TStringGrid.Rows и метод TStrings.Assign уже запретили?
P.S. Я понимаю что этот способ "перанальный", но захотелось побуквоедствовать. :)
Anatoly Podgoretsky (2008-06-09 01:04:00) [22]
> Ну и ладно.
> А задачка-то решена.
Без автора неясно.
Тын-Дын (2008-06-08 23:27:00) [23]
> alex-drob © (08.06.08 23:26) [20]
> > Random(n)где гарантия что каждый раз будет выпадать разное
> число и все строки будут заполнены?
Гарантии нет. Такой задачки не ставил перед собой.
Это ж пример просто.
Тын-Дын (2008-06-08 23:27:00) [24]
> Anatoly Podgoretsky © (08.06.08 23:24) [19]
> И не трындеть, а тындынец.Автор вопрос бросил и исчез, наверно
> задачу свою выполнил.
-)
Ну и ладно.
А задачка-то решена.
alex-drob (2008-06-08 23:26:00) [25]
> Random(n)
где гарантия что каждый раз будет выпадать разное число и все строки будут заполнены?
Anatoly Podgoretsky (2008-06-08 23:24:00) [26]И не трындеть, а тындынец.
Автор вопрос бросил и исчез, наверно задачу свою выполнил.
Anatoly Podgoretsky (2008-06-08 23:23:00) [27]> Тын-Дын (08.06.2008 23:12:16) [16]
Ты просил, я ответил, какие претензии.
Тын-Дын (2008-06-08 23:12:00) [28]Можешь продолжать трындеть.
Тын-Дын (2008-06-08 23:12:00) [29]
> Anatoly Podgoretsky © (08.06.08 23:09) [15]
> > Кто скажет, что условия автора не выполняются? Я
Ну этой фразой ты, видимо, хочешь сказать, что тебе ничего не нужно говорить, так как ты по-определению истина.
Anatoly Podgoretsky (2008-06-08 23:09:00) [30]
> Кто скажет, что условия автора не выполняются?
Я
korneley (2008-06-08 22:47:00) [31]
> Anatoly Podgoretsky © (08.06.08 20:47) [12]
>Предлаегаешь снять шляпы и почтить минутой молчания?
Присоединяюсь. Аминь ему. Не путать с анафемой :)) Хотя... Как знать...
Тын-Дын (2008-06-08 21:24:00) [32]Кто скажет, что условия автора не выполняются? -
var
n: Integer;
i,j: Integer;
arrs: array of String;
begin
Randomize;
SetLength(arrs,sg.RowCount);
for i := 0 to sg.RowCount-1 do
begin
for j := 0 to 80 do arrs[i] := arrs[i] +Chr(Random(128));
end;
n := sg.RowCount-1;
for i := 0 to sg.RowCount-1 do sg.Rows[Random(n)].CommaText := arrs[i];
Anatoly Podgoretsky (2008-06-08 20:47:00) [33]> JanMihail (08.06.2008 20:00:08) [8]
Предлаегаешь снять шляпы и почтить минутой молчения?
Anatoly Podgoretsky (2008-06-08 20:46:00) [34]> alex-drob (08.06.2008 19:20:04) [4]
А ни как построчно у него не получится, даже если заполнять подготовленую строку, то как минимум ее придется заполнять по ячеечно.
Desdechado (2008-06-08 20:23:00) [35]Пока не указана закономерность, все порядки - случайные.
korneley (2008-06-08 20:07:00) [36]Яволь, натюрлих... Тем более, что в [2] однозначно "индекс аут оф..." присутствует :)
JanMihail (2008-06-08 20:00:00) [37]
> korneley © (08.06.08 19:56) [7]
Автора уже нет с нами, поэтому думаю не стоит заморачиваться на этом
korneley (2008-06-08 19:56:00) [38]Дык, и в [2] не "построчно", а "поячеечно" :) Случайно - да. Но до 100-а :)))
alex-drob (2008-06-08 19:49:00) [39]
> Протелепатировали по-полной?
нет
ну есле так:
построчно в случайном порядке
то строки в случайном порядке,
а есле так:
построчно ,в случайном порядке
то как в [2]
korneley (2008-06-08 19:40:00) [40]
> alex-drob © (08.06.08 19:20) [4]
> написанно построчно
Протелепатировали по-полной? Тогда объясните, что имелось в виду: " построчнов случайномпорядке". Для TStringGrid - а.
| |
Страницы: 