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

Вниз

Пример из дельфийского ХЕЛПа..не работает   Найти похожие ветки 

 
quadronik ©   (2005-10-09 04:58) [0]

Почему не работают эти строки?
procedure TForm1.Button1Click(Sender: TObject);
var
 i: Integer;
begin
Label1.Caption := "";
 for i := 1 to Length(Edit1.Text) do
 begin
   try
     Label1.Caption := Label1.Caption + IntToHex(Edit1.Text[i],2) + " ";
   except
     Beep;
   end;
 end;
end;

>Error: There is no overloaded version of "IntToHex" that can be called with these arguments.
Пример взят из дельфийского ХЕЛПа при поиске ключевого слова "IntToHex"


 
Джо ©   (2005-10-09 05:05) [1]

Сегодня какая-то ночь ошибок в Хелпе :(
Нужно так:
Label1.Caption := Label1.Caption + IntToHex(Ord(Edit1.Text[i]),2) + " ";


 
quadronik ©   (2005-10-09 05:23) [2]

Вот спасибо!
Теперь могу продолжить свою возню....


 
Anatoly Podgoretsky ©   (2005-10-09 13:31) [3]

Потому что нет перегруженной версии IntToHex(Ch: Char; N: Integer)
Если тебе такая нужна, то напиши ее, код и объявление приведены



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
4-1124778504
officeman
2005-08-23 10:28
2005.10.30
как получить полный путь каталога "Рабочий стол"


14-1128701922
X9
2005-10-07 20:18
2005.10.30
Вопрос знатокам XML (и Delph :) )


14-1128999519
Laymer
2005-10-11 06:58
2005.10.30
ErWin и FireBerd


5-1107877683
Elast
2005-02-08 18:48
2005.10.30
Уничтожение ListBox


3-1126857491
kolos_rus
2005-09-16 11:58
2005.10.30
Хочется чтобы IBserver фиксировал дату и время создания записи.