Текущий архив: 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