Форум: "Основная";
Текущий архив: 2003.08.11;
Скачать: [xml.tar.bz2];
Внизpchar >> integer Найти похожие ветки
← →
McSimm2 (2003-07-28 14:21) [0]Как pchar из моего edit`а перевести в integer?
integer(pchar) что то не то помоему
← →
BOA_KAA (2003-07-28 14:25) [1]Про StrToInt ничего не слышали?
← →
Leran2003 (2003-07-28 14:25) [2]i:=StrToInt(Edit1.Text);
Вы это имели в виду???
← →
Anatoly Podgoretsky (2003-07-28 14:26) [3]А что делает pchar в твоем edit, точнее где он там
← →
McSimm2 (2003-07-28 14:30) [4]Сделать принципиально, используя только winapi - strToInt() не подходит.
PChar получается после использования GetWindowText()
← →
Anatoly Podgoretsky (2003-07-28 14:36) [5]STR
← →
Palladin (2003-07-28 14:36) [6]а что ты с ним хочешь сделать?
← →
Skier (2003-07-28 14:37) [7]>McSimm2 (28.07.03 14:30)
Что дальше планируешь делать с PChar-ром ?
← →
chs2r (2003-07-28 14:37) [8]StrToInt(string(varpchar)) ?
← →
Leran2003 (2003-07-28 14:38) [9]Держи когдато написал:
// функция преобразования строки в целое число
function MyStrToInt(S:string):integer;
const
Pos0=ord("0");
var
i,j,k:integer;
begin
j:=Length(S);
Result:=0;
if S[1]="-" then k:=2 else k:=1;
for i:=k to j do Result:=Result*10+ord(S[i])-Pos0;
if k=2 then Result:=-Result;
end;
...
MyStrToInt(StrPas(Твоя PChar строка));
← →
McSimm2 (2003-07-28 14:38) [10]C PChar я ничего не планирую делать - смысл в том, что мне нужно переменной, типа Integer присвоить то, что будет введено в edit`е
← →
McSimm2 (2003-07-28 14:39) [11]Leran2003 (28.07.03 14:38)
Спасибо !!
← →
Leran2003 (2003-07-28 14:41) [12]или
uses System;
...
val(StrPas(Твоя PChar строка),i,err);
if err<>0 then {Error}
← →
McSimm2 (2003-07-28 14:43) [13]Как можно StrPas заменить??? string() ?
← →
Anatoly Podgoretsky (2003-07-28 14:44) [14]Anatoly Podgoretsky © (28.07.03 14:36)
str отменяется, правильно val
← →
Ihor Osov'yak (2003-07-28 14:46) [15]Ой, держите меня. Счас свою имху погулять спущу...
- если есть проблемы написаить код по конвертации числа, представленного как строка с завершающим нулем в натив представление, то бишь integer, то "используя только winapi" несколько рановато будет.
- посмотреть реализацию StrToInt, или на крайняк вспомнить о Val религия не позволяет? Подсказка: Val с модуля system, от этого модуля не денешся покуда на делфи пишеш. А написать свою реализацию Val, более оптимальную чем борландовская - сомневаюсь как тоь.. Даже очень. Сомневаюсь.
И вопрос: что такое "используя только winapi" в вашем понимании?
← →
McSimm2 (2003-07-28 14:48) [16]Ihor Osov"yak © (28.07.03 14:46)
Не используя никаких uses кроме
Windows, Messages, System
← →
Leran2003 (2003-07-28 14:50) [17]function StrPas(const Str: PChar): string;
begin
Result := Str;
end;
← →
Palladin (2003-07-28 15:23) [18]Удалено модератором
Примечание: Offtopic
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.11;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.009 c