Форум: "WinAPI";
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];
ВнизТип PChar и пустая строка Найти похожие ветки
← →
Sly (2001-11-15 15:49) [6]Дык, напиши одну функцию
function MyPChar(Value: String): PChar;
begin
if Value = "" then
Result := nil
else
Result := PChar(Value)
end;
И
Procedure MyProc (strArg: String);
begin
Proc(MyPChar(Value));
end;
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.005 c