Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Вниз

StringGrid   Найти похожие ветки 

 
Dima S ©   (2004-04-12 12:36) [0]

Как сделать так чтобы, данные из StringGrid присваивались массиву данных. Ели кто занает то напешите.


 
infom ©   (2004-04-12 12:41) [1]

var Massiv:array[1..100,1..100] of string

var i,j:integer;
begin
for i:=1 to StringGrid1.ColCount do
for j:=1 to StringGrid1.RowCount do
massiv[i,j] := StringGrid.Cells[i,j];

end;


 
wisekaa ©   (2004-04-12 12:57) [2]


> infom ©   (12.04.04 12:41) [1]

А ты подумал, что будет если StringGrid1.ColCount или StringGrid1.RowCount > 100.

type
TMassiv = array of array of string;
var
i,j:integer;
Massiv: TMassiv;
begin
{Выделяем память под массив}
SetLength(Massiv,StringGrid1.ColCount,StringGrid1.RowCount);
{Заполняем массив}
for i:=1 to StringGrid1.ColCount do
for j:=1 to StringGrid1.RowCount do
massiv[i,j] := StringGrid.Cells[i,j];
{После использования освобождаем ресурсы}
SetLength(Massiv,0,0);
end;


 
Курдль ©   (2004-04-12 14:46) [3]


> Как сделать так чтобы, данные из StringGrid присваивались
> массиву данных.

Не могу себе представить, зачем из "Мерседеса" делать "Запорожець"?


 
2DSpike   (2004-04-13 20:21) [4]

А зачем? ведь данные в стринггирде и так уже в массиве (Cells[])?



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.032 c
14-1081052645
RealRascal
2004-04-04 08:24
2004.05.02
Какой CD-RW + DVD-ROM взять?


14-1081257414
Chapha
2004-04-06 17:16
2004.05.02
Таблица db*


1-1081770981
TButton
2004-04-12 15:56
2004.05.02
SetLength


1-1082026826
demonyator
2004-04-15 15:00
2004.05.02
Клавиатурный хук не ловит первую букву в каждом новом окне


3-1081224024
Hooch
2004-04-06 08:00
2004.05.02
SQL DMO





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский