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

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.49 MB
Время: 0.009 c
1-10218
sdasase
2003-07-20 17:51
2003.08.04
Как сделать чтобы форма была поверх окон,но не модальна?


3-10100
Ткаченко Сергей
2003-07-11 12:04
2003.08.04
SQL запрос в QuickReport


1-10300
BOA_KAA
2003-07-22 13:15
2003.08.04
wsMaximized


6-10320
tv
2003-05-28 16:23
2003.08.04
Вопрос о печати из TWebBrowser


1-10168
qwerty
2003-07-22 21:24
2003.08.04
File





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