Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> const помощь 
:(
    Опции темы
huismori
  Дата 23.1.2010, 13:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет
Почему он оленья кожа работа !!!


Код

var  
 FormMain: TFormMain;  
  
implementation  
  
{$R *.DFM} 

var
ini1 : TINIFile;
euro : integer;
tlr: integer;
usd  = integer;  
sar  = integer;  
gbp  = integer;  
chf  = integer;  
jpy  = integer;  
aud  = integer; 


const  
ini1 := TINIFile.Create( ExtractFilePath(Application.ExeName)+'Rates.INI ');
euro:= ini1.Readinteger('Rates','Euro', 0);
tlr:= ini1.Readinteger('Rates','TLR', 0);
usd:= ini1.Readinteger('Rates','USD', 0);
sar:= ini1.Readinteger('Rates','SAR', 0);
gbp:= ini1.Readinteger('Rates','GBP', 0);
chf:= ini1.Readinteger('Rates','CHF', 0);
jpy:= ini1.Readinteger('Rates','JPY', 0);
aud:= ini1.Readinteger('Rates','AUD', 0);
ini1.Free;
 euro  = euro;  
 tlr  = tlr;  
 usd  = usd;  
 sar  = sar;  
 gbp  = gbp;  
 chf = chf;  
 jpy = jpy;  
 aud = aud; 

var  
 EURO: Real;

procedure TFormMain.
...
...
...
...
 
PM MAIL   Вверх
profesiachuvak
Дата 23.1.2010, 14:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 283
Регистрация: 7.11.2009
Где: Беларусь, Минск

Репутация: 1
Всего: 4
Цитата(huismori @  23.1.2010,  13:57 Найти цитируемый пост)
Почему он оленья кожа работа !!!



 smile  smile  smile 

Where are you from?


Это сообщение отредактировал(а) profesiachuvak - 23.1.2010, 14:02


--------------------
Закон Мерфи :если есть вероятность того, что какая-нибудь неприятность может случиться, то она обязательно произойдет.
PM MAIL   Вверх
huismori
Дата 23.1.2010, 14:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет
UK  smile sorry for my bad russian... well it is not my bad russian it is google translates fault smile

Файл прилагается проект

Это сообщение отредактировал(а) huismori - 24.1.2010, 00:33
PM MAIL   Вверх
huismori
Дата 24.1.2010, 00:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет
Пожалуйста, помогите...

Это сообщение отредактировал(а) huismori - 24.1.2010, 11:24
PM MAIL   Вверх
Данкинг
Дата 24.1.2010, 01:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Цитата(huismori @  23.1.2010,  13:57 Найти цитируемый пост)
euro  = euro;  
 tlr  = tlr;  
 usd  = usd;  
 sar  = sar;  
 gbp  = gbp;  
 chf = chf;  
 jpy = jpy;  
 aud = aud; 

Maybe :=, not = ?

(and what's "оленья кожа" in English??)


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
huismori
Дата 24.1.2010, 01:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 125
Регистрация: 19.1.2010

Репутация: нет
Всего: нет
No no it is not like that in the project file I changed it before...
Download the project file and see it...
Thanks
PM MAIL   Вверх
Данкинг
Дата 24.1.2010, 02:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Why don't you try programming yourself, without using someone other's work? smile 

I've made changes to that project. Now it works (but I don't know if it does what it should do and without errors  smile )

Это сообщение отредактировал(а) Данкинг - 24.1.2010, 02:22

Присоединённый файл ( Кол-во скачиваний: 4 )
Присоединённый файл  rates.rar 12,29 Kb


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
CodeMonkey
Дата 25.1.2010, 12:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 29
Всего: 89
Цитата(huismori @  23.1.2010,  14:21 Найти цитируемый пост)
UK   sorry for my bad russian...

Then why do you ask questions on russian forum?  smile Why not use an english one? Stack Overflow for example?
Anyway, looks like you're totally newbie in Delphi. Why don't you read some book first?


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
Данкинг
Дата 25.1.2010, 15:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
CodeMonkey, там просто некий старинный код, выдранный непонятно откуда, к тому же и с косяками.


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
CodeMonkey
Дата 25.1.2010, 21:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 29
Всего: 89
Ну, я вижу smile
Я не понимаю, в чём прикол англоговорящему писать на русскоязычный форум. Почему не воспользоваться форумом на родном языке?


--------------------
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
PM MAIL WWW ICQ Skype GTalk Jabber   Вверх
Данкинг
Дата 25.1.2010, 22:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130
Цитата(CodeMonkey @  25.1.2010,  21:54 Найти цитируемый пост)
Я не понимаю, в чём прикол англоговорящему писать на русскоязычный форум. 

Винград - лучший!  smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0503 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.