Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2014.09.28;
Скачать: CL | DM;

Вниз

Указатель на запись, содержащей поля типа string, как параметр фу   Найти похожие ветки 

 
Некто   (2014-02-22 12:34) [0]

ДВС! Мне нужно передать в функцию параметр-указатель на запись, некоторые поля которой имеют тип string.
Возник вопрос: так можно, утечек никаких не возникнет?

type
 PMyRec = ^TMyRec;
 TMyRec = packed record
   intVar, intVar1: Integer;
   S, S1, S2: string;
 end;

function Test(const PRec: PMyRec): string;
begin
 if PRec <> nil then
   Result := PRec^.S1
 else
   Result := "nil";
end;

procedure TForm1.Button1Click(Sender: TObject);
var
 MR: TMyRec;
begin
 MR.S1 := "MR.S1 = ok";
 ShowMessage(Test(@MR));
end;


 
Некто   (2014-02-22 12:37) [1]

Забыл: string = AnsiString (D7)


 
jack128_   (2014-02-22 13:49) [2]


> так можно, утечек никаких не возникнет?

можно, утечек не будет.


 
Некто   (2014-02-22 14:03) [3]


> jack128_   (22.02.14 13:49) [2]

Спасибо!



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

Текущий архив: 2014.09.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.006 c
15-1392735372
[ВладОшин]
2014-02-18 18:56
2014.09.28
MSSQL: Как узнать какая строка обновлялась последней?


2-1382267269
Алла
2013-10-20 15:07
2014.09.28
RichEdit вставка гиперссылок


15-1393058086
Некто
2014-02-22 12:34
2014.09.28
Указатель на запись, содержащей поля типа string, как параметр фу


15-1384507806
Всеволод
2013-11-15 13:30
2014.09.28
Embarcadero RAD Studio XE5 с Android


1-1328221517
tButton
2012-02-03 02:25
2014.09.28
Поиск комбинации (оптимальный алгоритм)