Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
3-33072
Ahmad K
2003-07-17 03:38
2003.08.11
TDBListBox и все про него.


1-33162
Кодер
2003-07-28 13:28
2003.08.11
Скоростной сброс инфы в файл


1-33158
Relaxxx
2003-07-28 11:43
2003.08.11
Как мне узнать какого числа в указаном месяце выходные (т.е. суб)


1-33105
lord
2003-07-29 01:49
2003.08.11
чтение реестра


3-33077
Spawn
2003-07-17 19:27
2003.08.11
Сортировка





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский