Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.28;
Скачать: CL | DM;

Вниз

Проблемы с массивом записей.   Найти похожие ветки 

 
Geek   (2003-07-14 17:37) [0]

Есть объявленные типы.

TName = array [ 0..64 ] of char;
TItem = record
Name : TName;
SurName : TName;
end;

так же объявлен массив
Items : array of TItems;

так вот в присвоении
StringGrid1.Cells[ 0, 0 ] := Items[ count ].Name;
в ячейку пишется какая-то лажа.
аналогично с StrPas( PChar( @Items[ count ].Name ) );

хотя при отладке инспекция записи показывает правильный результат
как лечить???


 
Семен Сорокин ©   (2003-07-14 17:40) [1]

а нулевой символ #0 в конце каждой строки TName добавляешь?


 
Skier ©   (2003-07-14 17:41) [2]

1) Items : array of TItems; Это правильно ?
2) Покажи как выделяешь память под дин. массив


 
[lamer]Barmaglot ©   (2003-07-14 17:54) [3]

Вроде работает


procedure TForm1.Button1Click(Sender: TObject);
type
TItem = record
Name : array [ 0..64 ] of char;
SurName : array [ 0..64 ] of char;
end;
var
Items : array of TItem;
begin
SetLength(Items,1);
Items[0].Name:="lamer";
Items[0].SurName:="Barmaglot";
StringGrid1.Cells[ 0, 0 ] := Items[ 0 ].Name;

end;


 
Geek   (2003-07-14 17:55) [4]

#0 везде есть
Динамический массив выделяется нормально.
Setlength рулит =)
В рантайм массив выглядит так как надо...траблы вот в чем:
даже команда
Move( Items[ count ].Name, k^, 64 ); // k : PChar;
гонит пургу. И с операцией @Items[ count ].Name ТОЖЕ.
Это баг или фича?

как вариант принимаются советы -
как мне узнать указатель на поле Name в записи Items[ 0 ]?
т.е. корректный вариант @Items[ count ].Name



 
Skier ©   (2003-07-14 17:57) [5]

>Geek (14.07.03 17:55)

> Move( Items[ count ].Name, k^, 64 ); // k : PChar;
> гонит пургу.

Это ты "гонишь пургу".
И лучше всё-таки по-русски говорить...


 
Geek   (2003-07-14 18:08) [6]

Что тут не по-русски?

самый прикол, с TlistView что всё работало. Стоило поменять на
TStringGrid - и всё. приехали.

Код от [lamer]Barmaglot работает.

Может как-то влиять на ситуацию то что записи читаются из файла7


 
Skier ©   (2003-07-14 18:10) [7]

>Geek (14.07.03 18:08)
Может. Если неправильно читаешь...


 
Geek   (2003-07-14 18:24) [8]

всем спасибо...проблема решилась сама собой. как - не знаю =\


 
Geek   (2003-07-14 18:26) [9]

> Если неправильно читаешь...

Читает-пишет-читает правильно.
Похоже это был глюк из разряда "барабашка" =)



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

Текущий архив: 2003.07.28;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
3-91618
Vitek
2003-07-03 19:42
2003.07.28
Как работать с курсорами через Tquery используя север firebird1.2


6-91789
sapsi
2003-05-22 09:02
2003.07.28
Передача файлов через сокеты


1-91715
Nikolai_S
2003-07-14 15:07
2003.07.28
Вызов процедур из TList


6-91797
exciter__
2003-05-22 14:31
2003.07.28
Проблема с модемом (определить поднятие трубки)


3-91638
prihod
2003-07-04 17:00
2003.07.28
Какой оптимальный языковой драйвер для таблиц FoxPro