Область видимости

[chertovich]

Здравствуйте. Когда пишу подпрограммы, то возникает небольшие неудобства, связаны они с тем, что если я использую оператор with в подпрограмме и есть поле, имя которого совпадает с формальным параметром подпрограммы, то как мне обратиться к параметру. Конечно, можно использывать другое имя параметра, но я придерживаюсь одних и тех же понятных имен.

[_Engine_]

отказаться от with?

[chertovich]

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

отказаться от with?

Можно отказаться от with, можно поменять имя параметра или поля. Но это не выход. Может есть др. способы?

[Человек_Борща]

Приведите пример...

with object do
begin
{
Тут можно обращаться с метода/свойствам/событиям Objdct без указания ссылки на него т.е. не так:
object.<metod>.DoSmth
а сразу так <metod>.DoSmth
}
end;

Так с чем сложность то?

[chertovich]

procedure P(Value: Integer);
type
  TRecord = record
    Value: Integer;
  end;
var
  R: TRecord;
begin
  with R do
  begin
    Value := Value;
  end;
end;

Можно конечно написать R.Value, но у меня там большие структуры и это не очень красиво смотреться будет.

[Аватар]

В пределах предложения With, Delphi пробует решить неполные ссылки, смотря сначала на адресат стоящий после With. Остается только поменять имя параметра или поля - других решений нет

[Serge_Bliznykov]

а по моему, абсолютно логично, если имя параметра будет ОТЛИЧАТЬСЯ от имён полей..

например, так:

procedure P(pValue: Integer);

да и не только компилятору, но и любому читающему код, станет понятно, что там Value или pValue.
А на понятность ("я придерживаюсь одних и тех же понятных имен. ") это повлияет только в лучшую сторону!

[GunSmoker]

Замечу, что параметры обычно называют через "A": AValue.

Ещё замечу, что with - далеко не самый удачный оператор в Pascal.

Вместо with лучше использовать локальную переменную.

Но вот это:

у меня там большие структуры и это не очень красиво смотреться будет

Может говорить о неверно выбранном подходе. Получается, что ваши структуры - это объект. И операции, которые должны, по идее, выполняться самим объектом, у вас выполняются внешним (по отношению к структуре) кодом.

Вероятно, наиболее правильное решение - запись с методами (где вся работа с полями выполнятся самой записью). Если же это невозможно (старая Delphi), то стоит рассмотреть вариант использования полноценного класса.

[JUDAS]

Как вариант:

procedure GetProc(A,B,X,Y: Integer);
var
  MyRecord : packed record
   A : integer;
   B : integer; 
   C : integer;
   D : integer; 
  end;

begin
  with MyRecord do
  begin
    C := X;
    D := Y;
  end;
 MyRecord.A := A;
 MyRecord.B := B;
end;

Дублирующиеся поля "громезной структуры" вне wiht, недублирующиеся внутри.
Я использую именно такой способ, например при хранении таких полей как FileName Handle и.т.п

[chertovich]

Замечу, что параметры обычно называют через "A": AValue

Никогда не слышал об этом. Буква А, это сокращение какого английского слова?

Ещё замечу, что with - далеко не самый удачный оператор в Pascal.

Согласен, источник многих ошибок, если точно не знать методов или быть невнимательным

Может говорить о неверно выбранном подходе. Получается, что ваши структуры - это объект. И операции, которые должны, по идее, выполняться самим объектом, у вас выполняются внешним (по отношению к структуре) кодом

Нет, не говорит, критична производительность, хотя я с вами соглашусь, но не в плане производительности. Невозможно оценить правильность подхода, не зная ситуацию. Не всегда нужно использовать ООП.

Вероятно, наиболее правильное решение - запись с методами (где вся работа с полями выполнятся самой записью). Если же это невозможно (старая Delphi), то стоит рассмотреть вариант использования полноценного класса.

Не, мне проще отказаться от with или использовать полное или др. имя