Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Вниз

Вопрос по PChar   Найти похожие ветки 

 
Alexander   (2002-10-10 07:17) [0]

Делаю так:


S, D: PChar

GetMem(D, Length(S) + 1);
StrCopy(D, S);


но, когда S := nil, то вылетает ошибка и приходится делать присваивание так:


if Assigned(S) than
StrCopy(D, S)
else
StrCopy(D, "");


нельзя ли это делать как-то проще?

И ещё, если я присваиваю D новое значение, то надо делать так?:


ReallocMem(D, Length(S) + 1);
if Assigned(S) than
StrCopy(D, S)
else
StrCopy(D, "");


 
Dimka Maslov   (2002-10-10 10:20) [1]

Работай со строками AnsiString, а при необходимости приводи их к типу PChar

var
S, D: AnsiString;
P: PChar;
begin
S:="asdfghj";
D:=S;
P:=PChar(D);
...

И забудь про GetMem и StrCopy




 
REA   (2002-10-10 10:37) [2]

SetString тоже полезная функция



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

Форум: "WinAPI";
Текущий архив: 2002.11.21;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.007 c
1-69424
X-Guest...
2002-11-08 18:13
2002.11.21
Здраствуйте, подскажите как лучше работать с файлами...


1-69300
Dim!S
2002-11-12 13:21
2002.11.21
PageControl


1-69262
S_Dimon
2002-11-11 23:34
2002.11.21
Ну вот нет у TLabel такого ивента


14-69578
sancho
2002-11-03 19:26
2002.11.21
Install shield express


6-69457
NickS
2002-09-24 22:20
2002.11.21
Socket





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский