Скачать: CL | DM;

Что здесь не правильно ?   Найти похожие ветки 

← →
Yakudza ©   (2003-10-14 11:26) [0]

if MyMemo = nil then
begin
MyMemo := TMemo.Create(frmStatus);
MyMemo.Parent := frmStatus;
MyMemo.Color := clBlack;
end;

Мемо не создаеться.

---

← →
Семен Сорокин ©   (2003-10-14 11:27) [1]

а может создается но его не видно?

---

← →
Семен Сорокин ©   (2003-10-14 11:27) [2]

а может создается но его не видно?

---

← →
Reindeer Moss Eater ©   (2003-10-14 11:32) [3]

MyMemo <> nil

---

← →
dmtr ©   (2003-10-14 11:40) [4]

> Reindeer Moss Eater © (14.10.03 11:32) [3]


При первом вызове = nil

У меня создается

var
MyMemo: TMemo;

procedure TForm1.Button1Click(Sender: TObject);
begin
if MyMemo = nil then
begin
MyMemo := TMemo.Create(form1);
MyMemo.Parent := Form1;
MyMemo.Color := clBlack;
end;
end;

---

← →
dmtr ©   (2003-10-14 11:44) [5]

Где у тебя объявленно MyMemo? Если локально, то не создаться, т.к. локальные переменные не обнуляются, соответственно условие if не выполнится. Объяви глобально или как член класса формы

---

← →
Семен Сорокин ©   (2003-10-14 11:45) [6]

2Yakudza
а может у тебя на frmStatus есть панелька (или другое что), под которой твой мемо и создается?

---

← →
Reindeer Moss Eater ©   (2003-10-14 11:46) [7]

Если код приведен правильно и мемо не создается, то
MyMemo <> nil

---

← →
Reindeer Moss Eater ©   (2003-10-14 11:47) [8]

var MyMemo : TMemo = nil;

---

← →
Юрий Зотов ©   (2003-10-14 11:48) [9]

> Yakudza © (14.10.03 11:26)
> Что здесь не правильно

Клавиша F8 отвечает на такие вопросы за 5 секунд. Гораздо быстрее, чем писать на форум.

---

← →
Yakudza ©   (2003-10-14 11:48) [10]

Вот так проверять можно MyMemo <> nil
а чего неззя MyMemo = nil, непонимаю..

---

← →
Reindeer Moss Eater ©   (2003-10-14 11:54) [11]

а чего неззя MyMemo = nil, непонимаю..

Можно. Что у тебя и делается. И при этом результат = False;

---

← →
dmtr ©   (2003-10-14 11:55) [12]

> Reindeer Moss Eater © (14.10.03 11:46) [7]
> Если код приведен правильно и мемо не создается, то
> MyMemo <> nil
>
>
> Reindeer Moss Eater © (14.10.03 11:47) [8]
> var MyMemo : TMemo = nil;


Вы не видите противоречий?

---

← →
app ©   (2003-10-14 11:57) [13]

Мы так и не дождемся рассказа про это секретное MyMemo

---

← →
Reindeer Moss Eater ©   (2003-10-14 11:57) [14]

dmtr ©
В упор не вижу

---

← →
Yakudza ©   (2003-10-14 11:57) [15]

2Семен Сорокин ©
>а может у тебя на frmStatus есть панелька (или другое что), >под которой твой мемо и создается?

Есть панелька .

---

← →
Yakudza ©   (2003-10-14 11:58) [16]

2Юрий Зотов © (14.10.03 11:48) [9]
Смотрел, не nil, непонятно, потому и спрашиваю.

---

← →
Reindeer Moss Eater ©   (2003-10-14 12:00) [17]

Мемо не создаеться.

Люди исходили из того, что не создаеться

---

← →
Yakudza ©   (2003-10-14 12:02) [18]

Я короче нифига уже непонимаю, из диалогов, заторбили :))

Но у меня уже все получаеться, спасибо, уже раздуплился, что не так и как надо :))

---

← →
dmtr ©   (2003-10-14 12:03) [19]

> Reindeer Moss Eater © (14.10.03 11:57) [14]
> dmtr ©
> В упор не вижу

Если при инициализации MyMemo = nil, то как мы сможем зайти в блок if для создания если проверяем на неравенство.

2 Yakudza ©
Где описано MyMemo!!!!!!!!!!!!!

---

← →
Reindeer Moss Eater ©   (2003-10-14 12:04) [20]

Если при инициализации MyMemo = nil, то как мы сможем зайти в блок if для создания если проверяем на неравенство.

Вот так вот и зайдем с разбегу.
Потому что if вернет True

---

← →
Yakudza ©   (2003-10-14 12:05) [21]

dmtr © (14.10.03 12:03) [19]
локально :((

---

← →
dmtr ©   (2003-10-14 12:08) [22]

> Reindeer Moss Eater © (14.10.03 12:04) [20]

Вы хотите сказать, что если
MyMemo := nil;
if MyMemo <> nil then
мы окажемся в этом блоке?

---

← →
Yakudza ©   (2003-10-14 12:09) [23]

dmtr © (14.10.03 12:03) [19]
... было, вынес в глобальные обьявления и присвоил при инициализации nil, все работает.

---

← →
dmtr ©   (2003-10-14 12:10) [24]

> Yakudza © (14.10.03 12:09) [23]

Вот и молодец :)))

---

← →
Reindeer Moss Eater ©   (2003-10-14 12:13) [25]

dmtr ©
Я хочу сказать, что в [3] был приведен не код, а диагноз.

---

← →
Yakudza ©   (2003-10-14 12:14) [26]

2dmtr ©
Так спасибо ж, помог :)

---

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

Скачать: CL | DM;



Память: 0.5 MB
Время: 0.024 c