Вниз
Скачать: CL | DM;

Теория: Как эта функция отдаёт константы?   Найти похожие ветки 

 
Vyacheslav   (2011-11-29 14:44) [0]

Просьба откликнуться тем, у кгого кроме понимания, есть навыки растолковать материал.
Собственно полюбившийся мне модуль: http://www.koders.com/delphi/fidDB05C6361540F62D532FC7C960D4111CE3AAEDB3.aspx
Собственно вот основная чать (а именно функция) по которой возник вопрос:
function ExecuteConsoleApp(const aCommandLine: string;
 const aCurrentDir: string = "";
 const aAppOutput: TStrings = nil;
 const aOnNewText: TZpOnNewTextEvent = nil;
 const aOnNewLine: TZpOnNewTextEvent = nil;
 const aEnvironment: TStrings = nil;
 const aProcessPriority: TZpProcessPriority = ppNormal): Cardinal;

Возьмём примитивный пример её работы вне модуля по событию кнопки:
procedure TForm1.Button1Click(Sender: TObject);
begin
ExecuteConsoleApp("ping ya.ru -n 10", "", Memo1.Lines);
Memo1.Lines.Add("Done!");
end;


1) Каким образом Memo1.Lines получает через aAppOutput.Add(sNewLine); в режиме реального времени строки до того как функция не завершила свою работу?
2) При всё этом не понятно то, что aAppOutput: TStrings обьявлена как константа. Как это понять?
Как предположение, только думаю, если оба aAppOutput: TStrings и Memo1.Lines как указатели ссылаются на одни и те же данные.
3) Можно ли таким образом передать Integer данные?


 
Anatoly Podgoretsky ©   (2011-11-29 14:59) [1]

Думаешь удастся создать филиал курсов по программированию?


 
app ©   (2011-11-29 15:00) [2]

Слишком много вопросов, а тема одна



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
2-1322555028
Cobalt
2011-11-29 12:23
2012.03.11
IFDEF, не та версия?


15-1321384309
Faceless
2011-11-15 23:11
2012.03.11
Работа Delphi программистом в США


2-1322507312
_qwerty_
2011-11-28 23:08
2012.03.11
работа с таблицей бд из класса


15-1321220394
KilkennyCat
2011-11-14 01:39
2012.03.11
TCanvas & HTML


2-1322608424
vit196sh
2011-11-30 03:13
2012.03.11
Помогите с несложной программой пожалуйста)))




   Наверх