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

Вниз

string и memo1.Lines   Найти похожие ветки 

 
ghg   (2003-11-18 15:57) [0]

в design-time в св-во lines вписываю некоторые строки
далее пишу такое

procedure OpenGrid;
var i:integer; s,ss:string;
begin
ss:=Form1.memo1.Lines.text;
...
...
end;

и имею AV на строке присвоения.

Почему?


 
Семен Сорокин   (2003-11-18 15:59) [1]

а Form1 существует?


 
ghg   (2003-11-18 16:13) [2]

эта процедура используется в Form1.OnShow
так что форма уже создана


 
Reindeer Moss Eater   (2003-11-18 16:16) [3]

эта процедура используется в Form1.OnShow

Тогда зачем
ss:=Form1.memo1.Lines.text;

а не
ss:=memo1.Lines.text;

?

так что форма уже создана
Это не значит, что переменная Form1 содержит ссылку не нее.


 
ghg   (2003-11-18 16:38) [4]

procedure OpenGrid;
var i:integer; s,ss:string;
begin
ss:=form1.memo1.Lines.text;
With Form1.StringGrid1 do
begin
ColWidths[0]:=16;
ColWidths[1]:=76;
ColWidths[2]:=76;
end;
...
...

если закоментировать выделенную стороку, то все дальше работает
так что по-моему, с Form1 все нормально


 
Reindeer Moss Eater   (2003-11-18 16:43) [5]

А по моему все с ней ненормально


 
Reindeer Moss Eater   (2003-11-18 16:46) [6]

procedure OpenGrid;
эта процедура используется в Form1.OnShow


Почему бы ей не передать параметром memo1?


 
Семен Сорокин   (2003-11-18 16:50) [7]

Reindeer Moss Eater © (18.11.03 16:46) [6]
тогда уж сделать методом класса TForm1


 
icWasya   (2003-11-18 18:23) [8]

ну если попробуй решать по частям:

var
Memo :TMemo;
Lines:TStrings;

...
Memo := Form1.Memo1;
Lines:= Memo1.Lines;
SS:=Lines.Text;

...
и где будет ошибка ??



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

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

Наверх




Память: 0.45 MB
Время: 0.007 c
6-90051
Дмитрий В. Белькевич
2003-09-16 23:42
2003.11.27
Ping из-под НЕ админа


14-90121
Agent[007]
2003-11-02 12:53
2003.11.27
Точка и треугольник. (В ПРОСтРАНСТВЕ)


1-89941
Мыш
2003-11-18 08:58
2003.11.27
Почему create Tobject-a не дает сделать override в потомке?


8-90016
sam_perm
2003-08-01 13:37
2003.11.27
распознование бланков


3-89737
pashaz
2003-11-05 01:31
2003.11.27
Редактирование DBGrid





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский