![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Передача параметров..
r.o.o.t © (2007-08-15 16:23:00)Господа подскажите как передавать в процедуры TStringList
???
дайте пару примеров плииз
{RASkov} (2007-08-16 01:47:00) [1]> дайте пару примеров плииз
> [2] Ega23 © (15.08.07 16:30)
> [3] umbra © (15.08.07 16:30)
Одновременно пара примеров :)
Ega23 (2007-08-15 16:30:00) [2]
procedure MyProc(List : TStringList);
begin
With List do ....
end;
procedure TForm1.OnButton1Click(Sender : TObject);
var
sl : TStringList;
begin
sl := TStringList.Create;
try
MyProc(sl);
finally
sl.Free;
end;
end;
umbra (2007-08-15 16:30:00) [3]
mystringlistvar := TStringList.Create;
{.....................................................}
mySuperPuperProc(mystringlistvar);
Сергей М. (2007-08-15 16:25:00) [4]что, ОР не по зубам ?)