Можно ли не создавая TStringList (использую with...do), использовать его в процедуре?

[TwiX]

Первой моей мыслью было:

with TStringList.Create do
begin
  parseList(Self); //я думал, что если использовать with, то в Self загониться то, к чему я применил with
  free;
end

Что нужно писать вместо Self, или так нельзя?

Update:
Второй моей мыслью стало:

var
  a: TStringList;
begin
  with a:=TStringList.Create do
  begin
    StrParseToList(s, a);
    s:=a.Strings[0];
    free;
  end;

Но компилятор сказал, что так нельзя делать)

[spamer]

Ммм интересно, а как вы хотите что то делать с TStringList если вы его не создадите - не будет объекта данного класса? Или может я чего то не понимаю?
Ну а вообще почему бы не написать так:

var
  a: TStringList;
begin
a:=TStringList.Create;
  with a do
  begin
    StrParseToList(s, a);
    s:=a.Strings[0];
    free;
  end;

EDIT:
В Self будет указатель на объект, который вызвал данную процедуру.

[TwiX]

Про self - я знаю. Думал, что с with так сработает просто.
Не хочу тратить переменную.

не будет объекта данного класса

Как же мы тогда вызывам его методы в begin...end после with?

[spamer]

Наверное вы меня не поняли.
Вы написали :

Можно ли не создавая TStringList (использую with...do), использовать его в процедуре?

Следовательно, я ответил, вернее у вас спросил:

а как вы хотите что то делать с TStringList если вы его не создадите - не будет объекта данного класса

наверное лучше тогда так, как же вы будете использовать объект данного класса, если вы его не создадите? Сейчас вроде понятнее написал.

Не хочу тратить переменную.

А как же вы тогда хотите с ним работать? Смотреть вопрос выше.

[TwiX]

Бррр...
Вы меня совсем не поняли. Я имел в виду, что не хочу заводить переменную, а просто обойтись с witth...do.
Вот так можно работать с объектом Tstringlist, но нельзя его использовать в качестве переменной:

with TStringList.Create do
begin
  add('asd');
  savetofile('1.txt');
  free;
end

При этом не нужно заводить отделбную переменную.

[spamer]

А вот теперь ясно.
Хотя я вот не пойму, а как же тогда выделяется объекту память, если объекта у нас нету? По сути мы работаем с типом, как такое возможно? Чего то не пойму как оно работает, вот.
Может кто то объяснить?

[TwiX]

По вызову TStringList.Create объекту выделяется память и даётся хендл, с которым и работает with...do.
Только вот как узнать сам хендл)

[spamer]

TwiX, мене кажется чего то ты сильно перемудрил. Создай переменную та и все. Все равно память ты не сэкономишь, а мороки получается больше.

[Greek9000]

Сообщение от TwiX

Первой моей мыслью было:

with TStringList.Create do
begin
  parseList(Self); //я думал, что если использовать with, то в Self загониться то, к чему я применил with
  free;
end

Что нужно писать вместо Self, или так нельзя?

Update:
Второй моей мыслью стало:

var
  a: TStringList;
begin
  with a:=TStringList.Create do
  begin
    StrParseToList(s, a);
    s:=a.Strings[0];
    free;
  end;

Но компилятор сказал, что так нельзя делать)

Года три назад у меня тоже был такой же вопрос (даже рассуждения про Self и присвоение внутри with были в том же порядке До сих пор в объявлении пишу
sl:TStringList;
Так что маловероятно, что можно сделать как-то ещё.
А жаль. Было бы очень удобно.