![]() |
![]() |
Crey 03.08.2004 - 12:20 | Вопрос конечно тупой но, необходимо создать StringGrid на заданное количество строк. Могет кто-нить подскажет. |
Crey 1 - 03.08.2004 - 12:36 | То есть есть форма со списком и по количеству строк в списке необходимо создать StringGrid. Унижтожаю, создаю вылетает наглухо. |
cathode 2 - 03.08.2004 - 12:41 | Так у вас TStringGrid создается в рантайме или загружается вместе с формой? |
Crey 3 - 03.08.2004 - 12:42 | Рантайм |
cathode 4 - 03.08.2004 - 12:47 | А вылетает когда? Поподробнее, пожалуйста. |
Crey 5 - 03.08.2004 - 12:55 | Когда пытаюсь создать StringGrid |
Crey 6 - 03.08.2004 - 13:02 | У тебя под рукой нет случайно кусочка кода с созданием StringGrid? Если случайно есть, могет на мыло скинешь. |
cathode 7 - 03.08.2004 - 13:12 |
Боюсь, что кода с собой нет, я теперь Один Эсник :) Но по памяти, приблизительно так: type TMyForm = class(TForm) private FDynStringGrid: TStringGrid; public procedure FormCreate(AOwner: TObject); end; implementation procedure TMyForm.FormCreate(AOwner:TObject); begin FDynStringGrid := TStringGrid.Create(Self); with FDynStringGrid do begin Owner := Self; Top := 10; .... Width := 250; ColumnCount := 10; RowCount := 10; FixedCols := 1; FixedRows := 1; Visible := True; end; end; end. Заранее прошу прощения за ошибки и неточности, компилятора под рукой нет. Ошибка, по моему мнению, могла заключаться в том, что вы создаете объект, описанный в локальной переменной, а при выходе из функции ссылка на него теряется. |
Crey 8 - 03.08.2004 - 13:20 | Спасибо. Домой доползу попробую. Код только дома лежит. |