VPF::Ошибка при засовывании строки в Caption

Тутанхамец

Дата 19.4.2006, 12:09 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 612
Регистрация: 10.10.2005
Где: в пирамидЕ!

Репутация: 1
Всего: 6

ТУфта какая-то... никак не соображу, что не так.

Вот этот код вызывает ошибку acess violation.

Код


    check:=Tcheckbox.create(sb);
      sb.insertcontrol(check);
      with check do begin
        width:=sb.width-(5*x);
        height:=20;
        left:=x;
        top:=y;
        show;
        font.Size:=12;
        font.Style:=[fsItalic];
        font.Name:='Georgia';
        check.caption:=mytest.Questions[i].answers[j].text; //здесь баг

Хотя вот такой код работает:

Код


   lab:=Tlabel.create(sb);
    sb.insertcontrol(lab);
    with lab do begin
      font.Size:=12;
      font.Style:=[fsBold, fsItalic];
      font.Name:='Arial';
   caption:=mytest.Questions[i].text;//работает

     width:=sb.width-(5*x);
      autosize:=true;
      wordwrap:=true;
      left:=x;
      top:=y;
      show;
    end;

Тип Caption и там и там TCaption. Тип присваиваемого и там, и там - string. Sb - это ScrollBar.

Помогите, пожалуйста.

Добавлено @ 12:14
Прошу прощения, я бываю туповат. Парился полчаса, а не просек очевидную штуку... Caption тут не при чем. Сбой был из-за несуществующего индекса в массиве. Вопрос закрыт.

Это сообщение отредактировал(а) Тутанхамец - 19.4.2006, 12:11

--------------------

Мой блог / Мои фотки / Моё Skolkobudet.ru

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »