Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > const помощь

Автор: huismori 23.1.2010, 13:57

Почему он оленья кожа работа !!!

Код


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.
...
...
...
...

Автор: profesiachuvak 23.1.2010, 14:01

Цитата(huismori @ 23.1.2010, 13:57

)

Почему он оленья кожа работа !!!

Where are you from?

Автор: huismori 23.1.2010, 14:21

sorry for my bad russian... well it is not my bad russian it is google translates fault smile

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

Автор: huismori 24.1.2010, 00:25

Пожалуйста, помогите...

Автор: Данкинг 24.1.2010, 01:20

Цитата(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??)

Автор: huismori 24.1.2010, 01:29

No no it is not like that in the project file I changed it before...
Download the project file and see it...
Thanks

Автор: Данкинг 24.1.2010, 02:20

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

)

Автор: CodeMonkey 25.1.2010, 12:42

Цитата(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? http://stackoverflow.com/ for example?
Anyway, looks like you're totally newbie in Delphi. Why don't you read some book first?

Автор: Данкинг 25.1.2010, 15:18

CodeMonkey, там просто некий старинный код, выдранный непонятно откуда, к тому же и с косяками.

Автор: CodeMonkey 25.1.2010, 21:54

Ну, я вижу smile

Я не понимаю, в чём прикол англоговорящему писать на русскоязычный форум. Почему не воспользоваться форумом на родном языке?

Автор: Данкинг 25.1.2010, 22:25

Цитата(CodeMonkey @ 25.1.2010, 21:54

)

Я не понимаю, в чём прикол англоговорящему писать на русскоязычный форум.

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