Показать сообщение отдельно
  #1  
Старый 18.01.2012, 14:51
Аватар для arxlex
arxlex arxlex вне форума
Прохожий
 
Регистрация: 04.11.2011
Адрес: localhost
Сообщения: 14
Версия Delphi: D7
Репутация: 10
По умолчанию Из Qt Creator в Delphi

Цитата:
Код:
int toInt(bool *ok=0, int base=10) const;

и

Код:
inline QString &QString::setNum(float n, char f, int prec)
{ return setNum(double(n),f,prec); }

Как использовать или реализовать эти классы в Delphi? Спасибо заранее!!!

Вот это и нужно перевести в паскаль...
Код:
QString serialNumber, tmp;
int serialLength=0;
bool ok,recovery=false;
...
serialLength = tmp.toInt(&ok, 16) - 10; 
recovery = true;
...
tmp.setNum(serialNumber.length()+15, 16);
tmp = tmp.rightJustified(4, '0');
__________________
|Mess With The Best Die Like The Rest|
Ответить с цитированием