Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.04;
Скачать: CL | DM;

Вниз

Image   Найти похожие ветки 

 
Opera ©   (2003-07-17 11:53) [0]

Люди помогите перевести в код!

begin
if в image1 загружена картинка then
image2.Picture.LoadFromFile("x.bmp")
else
image1.Picture.LoadFromFile("x.bmp");
end;


 
Skier ©   (2003-07-17 11:57) [1]

begin
if not image1.Picture.Bitmap.Empty then
image2.Picture.LoadFromFile("x.bmp")
else
image1.Picture.LoadFromFile("x.bmp");
end;


только лучше так :


begin
if image1.Picture.Bitmap.Empty then
image1.Picture.LoadFromFile("x.bmp");
else
image2.Picture.LoadFromFile("x.bmp");
end;


 
Романов Р.В. ©   (2003-07-17 12:04) [2]

if Assigned(Image1.Picture.Graphic) then


 
Skier ©   (2003-07-17 12:04) [3]

>Романов Р.В. © (17.07.03 12:04)
Уверен ?


 
Романов Р.В. ©   (2003-07-17 12:09) [4]

нет


 
Skier ©   (2003-07-17 12:14) [5]

>Романов Р.В. © (17.07.03 12:09)
Проверить бы не мешало...;)


 
Романов Р.В. ©   (2003-07-17 12:17) [6]

Твой вариант надежнее


 
Opera ©   (2003-07-17 13:09) [7]

Спасибо Skier, все работает!

А вот с этим не поможете?

var
i: integer;
if FileExists(ProgDir+"\GameData\"+DirectoryListBox1.Items.Strings[i]+"\game.ini") then
вытянуть из game.ini 2 строчку и поместить её на Label2
else
Label2.Caption:="none";
end;


 
Skier ©   (2003-07-17 13:12) [8]

>Opera © (17.07.03 13:09)
см. TIniFile


 
Opera ©   (2003-07-17 13:15) [9]

Непонял!


 
Skier ©   (2003-07-17 13:16) [10]

Сочувствую...


 
pasha676   (2003-07-17 13:20) [11]


> вытянуть из game.ini 2 строчку и поместить её на Label2

Из ини вытягивается не номер строки а по разделу и параметру. См. хэлп на модуль TINiFiles и примеры. Все очень и очень просто.


 
Opera ©   (2003-07-17 13:40) [12]

Удалено модератором
Примечание: ;Без мата или будешь ReadOnly


 
NickBat ©   (2003-07-17 13:50) [13]

Тебе нужно сменить компилятор, чтобы он понимал твои предложения.
Или нанять на работу Skiera, если денег хватит. :)))))))


 
Opera ©   (2003-07-17 13:54) [14]

:-)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))))

А почь и нехотим. Только болтовня!


 
Opera ©   (2003-07-17 14:21) [15]

Удалено модератором
Примечание: Личная переписка


 
Skier ©   (2003-07-17 14:23) [16]

Удалено модератором
Примечание: Хоть и по делу, но давай без мата


 
Anatoly Podgoretsky ©   (2003-07-17 14:26) [17]

Skier © (17.07.03 13:12)
Не пойдет, TIniFile не работает с понятием номер строки!


 
Skier ©   (2003-07-17 14:31) [18]

>Anatoly Podgoretsky © (17.07.03 14:26)
А кто спорит...
Я просто думал что в ini-файле "вторая" строка как-то называется, иначе это не ini-файл, а что-то совсем другое.


 
VAleksey ©   (2003-07-17 14:31) [19]

Uses IniFiles;
...
Var FIni :TIniFile;
...
FIni := TIniFile.Create(ProgDir+"\GameData\"+DirectoryListBox1.Items.Strings[i]+"\game.ini");
Label2.Caption := FIni.ReadString("2","2","none");
..
FIni.Free;
PS
Типа 2- это вторая строка.
НО !!! Если тебе надо хранить данные именно во второй строке, то данный метод не годится.


 
Anatoly Podgoretsky ©   (2003-07-17 14:32) [20]

NickBat © (17.07.03 13:50)
Skier отказался, он ему предложил что то неприличное


 
Skier ©   (2003-07-17 14:35) [21]

>Anatoly Podgoretsky © (17.07.03 14:32)
Он мой e-mail начал бомбить.
А оно мне надо ?! :)


 
Anatoly Podgoretsky ©   (2003-07-17 14:39) [22]

Если не успокоится, накатай телегу провайдеру


 
NickBat ©   (2003-07-17 14:45) [23]

Anatoly Podgoretsky © (17.07.03 14:32)
NickBat © (17.07.03 13:50)
Skier отказался, он ему предложил что то неприличное

Неприлично большой заработок? :))))


 
Opera ©   (2003-07-17 14:55) [24]

Skier почему сразу неприличное, бомбить просто прошу помочь

И интересно как вы узнаете кто мой провайдер, у меня мож выделенка


 
Opera ©   (2003-07-17 15:07) [25]

Скажите кто мне действительно, реально может помочь? Бросайте на мыло!


 
pasha676   (2003-07-17 15:48) [26]


> Скажите кто мне действительно, реально может помочь? Бросайте
> на мыло!

Могу бросить тебе на мыло как пользоваться клавишей F1? А если серьезно - ты прочитал хэлп или нет? Обвинять что все какашки, а ты Дэртаньян - это мы умеем, я понял. А хэлп читать? Давай так - прочитай хэлп про ini файлы, а потом переформулируешь и задаш вопрос.


 
stone ©   (2003-07-17 15:55) [27]


> И интересно как вы узнаете кто мой провайдер, у меня мож
> выделенка


Да хоть трижды выделенка, по IP-адресу.



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

Текущий архив: 2003.08.04;
Скачать: CL | DM;

Наверх




Память: 0.52 MB
Время: 0.023 c
14-10348
Dmitriy O.
2003-07-16 07:55
2003.08.04
Программирование это профессия , призвание , болезнь ?


1-10176
AndreyAs
2003-07-17 15:51
2003.08.04
Rave Reports по-русски


6-10330
MikeFW
2003-05-29 12:17
2003.08.04
отправка сообщений в локальной сети


3-10135
Nick
2003-07-15 09:46
2003.08.04
Работа с TTable...


14-10452
мимо проходил
2003-07-18 13:48
2003.08.04
Узнай правду :))