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

Вниз

Глюк StatusText   Найти похожие ветки 

 
nsvi   (2003-04-26 02:20) [0]

Обнаружил такую картину:
стоит только обнулить StatusText т.е.
Form1.Form.StatusText[0]:=PChar(" ");
как тут же Runtime Error 216 at BFE9CDE8, причем это наблюдается в Win98.
В WinME и XP этого нет. В других не пробовал, но говорили мне, что и в WinNT тот же Error.
А если в данный момент мне не надо ничего выводить в StatusText? Как быть?
Пробовал выводить пробел, картина та же.

Даю это сообщение для тех, кто столкнется с этой ситуацией. Нельзя оставлять Form1.Form.StatusText пустым.


 
BaRToV   (2003-04-26 10:39) [1]

> Нельзя оставлять Form1.Form.StatusText пустым.
Что за бред?!...

Form1.Form.StatusText[0] := #0;
или
Form1.Form.StatusText[0] := "";
И под Win9x работает на ура.


 
nsvi   (2003-04-27 01:35) [2]

А если имеется такое?

if High then
W1:="gthhyjg"
else
W1:="";
Form1.Form.StatusText[0] := Pchar(W1);

и попробуй вставить это в
procedure TForm1.KOLForm1FormCreate(Sender: PObj);

Имелись несколько программок, все не работали в Win98 именно из-за этого. И не только при открытии формы, но и в процессе работы программ, если обнулялась строка статуса. Если бы это был бред, я бы не убил на это несколько часов работы.


 
BaRToV   (2003-04-27 09:07) [3]

> Имелись несколько программок, все не работали в Win98 именно из-за этого.
Еще раз скажу, все работает.

KOL/MCK 1.72, Delphi 5, Win 98 SE и Win Xp.

procedure TForm1.KOLForm1FormCreate(Sender: PObj);
var
b: Boolean;
st: string;
begin
b := FALSE; //TRUE; // Играемся параметрами

if b then
st := "Петрович"
else
( st) [3] > Имелись несколько программок, все не работали в Win98 именно из-за этого.
Еще раз скажу, все работает.

KOL/MCK 1.72, Delphi 5, Win 98 SE и Win Xp.

procedure TForm1.KOLForm1FormCreate(Sender: PObj);
var
b: Boolean;
st: string;
begin
b := FALSE; //TRUE; // Играемся параметрами

if b then
st := "Петрович"
else
st := "";

Form1.Form.StatusText[0] := PChar(st);
end;

Залей мне на мыло посмотрю.


 
Avenger [NhT]   (2003-04-27 13:36) [4]

Да паренек это у тя винда глючит...



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

Форум: "KOL";
Текущий архив: 2004.01.13;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
7-37950
AlexenderG
2003-10-30 16:41
2004.01.13
Как можно осуществить поиск файлов и узнать время их модификации?


14-37881
Vlad Oshin
2003-12-22 16:08
2004.01.13
:) Является ли посылка на AltaVistу, алгоритмом


4-37980
Санёк
2003-11-08 19:51
2004.01.13
Хук на принтер можно или


1-37766
baataars
2003-12-31 15:08
2004.01.13
dbgrid и колесико мыши


1-37666
GIL
2003-12-26 15:52
2004.01.13
закрытие приложения





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