Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2006-10-16 09:07:49 ЛС | профиль | цитата
Если я все правильно понял, то смысл твоего предложения (после выкидывания лишнего) таков:
procedure THIGlobalVar._work_doName;
var nName:string;
begin
nName := LowerCase(ToString(_Data));
if nName<>'' then GData := ForceGVar(nName);
end;

И фиг с ним со старым именем - пусть себе продолжает лежать в NList вместе с динамическими данными на которые ссылается .....
карма: 9

0
Редактировалось 1 раз(а), последний 2016-11-23 01:17:56