Как получить адресс строкий? Const MyStr:String = Hello! ;

← →
NikNet © (2005-05-29 09:35) [0]

Вообщем есть типа токого кода

Const
MyStr:String = "Hello!";

Begin
Writeln(chr(dword(ptr(mystr))));
end;

Вот только не получается получить эту букву "H"? :(
Пробывал и добовлять ImageBase тоже не получается :(

← →
VMcL © (2005-05-29 09:47) [1]

Pointer(MyStr)

← →
Marser © (2005-05-29 09:56) [2]

@MyStr[1]

← →
NikNet © (2005-05-29 10:23) [3]

Так тоже не идет... :(

← →
Marser © (2005-05-29 10:42) [4]

Const MyStr:String = "Hello!"; var c:char; p:pchar; begin p:=@MyStr[1]; c:=char(p^);

← →
Anatoly Podgoretsky © (2005-05-29 10:45) [5]

NikNet © (29.05.05 09:35)
Begin
Writeln(chr(dword(ptr(mystr))));
end;

Вот только не получается получить эту букву "H"? :(

Для получения буквы Н, надо быть проще
Writeln(mystr[1]);

Сообщение не соответствует теме конференции.

А как вычесть весь мой код со всеми моими модулями и т.д.?

Начало
Program Test;
...
...
...
Begin
end.
Конец

Как мне это узнать?

Как получить адресс строкий? Const MyStr:String = Hello! ; Найти похожие ветки