ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Сеттер проперти
10 сообщений из 35, страница 2 из 2
  2  все
Сеттер проперти
    #40011582
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
Док
XMLDoc один раз создается(в OnCreate) и один раз разрушается (в OnClose) главной формы, хотелось бы услышать советы в контексте данного условия.
Ну тогда все просто
Код: pascal
1.
property XMLDoc: TXMLDocument read FXMLDoc write FXMLDoc;


Док
Далее по коду у меня в основном идут проверки существования XMLDoc
Зачем? Если объект всегда создается
...
Рейтинг: 0 / 0
24.10.2020, 19:01
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40011588
x1ca4064
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
x1ca4064
Участник
Док

"Ну нету у меня, мужик, холодильника!" (с)

Нет такого метода у этого класса.


А CloneNode не подходит? Глубоко dom.pp не смотрел.
...
Рейтинг: 0 / 0
24.10.2020, 19:52
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40011736
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
_Vasilisk_
Зачем? Если объект всегда создается

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


x1ca4064
А CloneNode не подходит? Глубоко dom.pp не смотрел.

есть такой
https://lazarus-ccr.sourceforge.io/docs/lazutils/laz2_dom/tdomnode.clonenode.html

т.е. так будет корректно?
Код: pascal
1.
2.
3.
4.
5.
6.
7.
procedure TfrmMain.SetXMLDoc(AValue: TXMLDocument);
begin
  if FXMLDoc=AValue then Exit;
  if Assigned(FXMLDoc) then FreeAndNil(FXMLDoc);
  //FXMLDoc:=AValue;
  AValue.CloneNode(True,FXMLDoc);
end;



Кстати, хотел уточнить
Код: pascal
1.
if FXMLDoc=AValue then ...


будет возвращать True, если оба аргумента равны nil?
...
Рейтинг: 0 / 0
25.10.2020, 23:32
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40011740
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
Док
т.е. так будет корректно?

не-а, при попытке создать экземпляр XMLDoc получаю отлуп
Project fb_util_wrapper raised exception class 'EDOMNotSupported' with message:
EDOMNotSupported in Cloning/importing of TXMLDocument is not supported

In file 'laz2_dom.pas' at line 1345:
raise EDOMNotSupported.Create(Format('Cloning/importing of %s is not supported', [ClassName]));
...
Рейтинг: 0 / 0
25.10.2020, 23:45
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40011779
alekcvp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alekcvp
Участник
Док
Док
т.е. так будет корректно?

не-а, при попытке создать экземпляр XMLDoc получаю отлуп
Project fb_util_wrapper raised exception class 'EDOMNotSupported' with message:
EDOMNotSupported in Cloning/importing of TXMLDocument is not supported

In file 'laz2_dom.pas' at line 1345:
raise EDOMNotSupported.Create(Format('Cloning/importing of %s is not supported', [ClassName]));

Я что-то нигде не нашёл, что CloneNode само создаёт XMLDocument. Попробуй вместо FreeAndNil вызывать Clear (или что-там у него).
...
Рейтинг: 0 / 0
26.10.2020, 09:36
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40012707
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
alekcvp
Я что-то нигде не нашёл, что CloneNode само создаёт XMLDocument. Попробуй вместо FreeAndNil вызывать Clear (или что-там у него).

У Лазарусовского XML нет ни Clear, ни Assign - только Free, только хардкор TextContent :)

Короче, отказался я пока от этого. Перед созданием дочерней формы решил сохранять настройки формы-owner'а в файл, а после уничтожения дочки (которая меняет содержимое файла настроек) - опять грузить в хозяина настйроки из измененного файла. Слишком уж стремно где-то "потерять" ссылку на свойство и получить утечку
...
Рейтинг: 0 / 0
28.10.2020, 16:19
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40012777
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
Док,

А почему не пользуешься XMLPropStorage?
...
Рейтинг: 0 / 0
28.10.2020, 18:00
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40012808
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
Kazantsev Alexey,

чет мне как-то не зашел он, функционал показался бедным, да и компонент кривой, КМК. Может я чего не понял. В любом случае, я решил использовать пакеты Laz2_DOM и иже с ним, тем более, что они понимают UTF8.

Время будет, попробую еще JSON Tools
...
Рейтинг: 0 / 0
28.10.2020, 18:45
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40012815
Kazantsev Alexey
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kazantsev Alexey
Участник
Док
чет мне как-то не зашел он, функционал показался бедным

Свойства пишет/читает, и автоматически, и кастомно. Чего тебе ещё-то нужно?
...
Рейтинг: 0 / 0
28.10.2020, 19:00
| Ответить | Цитировать | Написать  
Сеттер проперти
    #40012913
Фотография Док
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Док
Участник
Kazantsev Alexey
Свойства пишет/читает, и автоматически, и кастомно. Чего тебе ещё-то нужно?

что-то не взлетело, какие-то кастомные свойства. Щас не вспомню
...
Рейтинг: 0 / 0
29.10.2020, 00:45
| Ответить | Цитировать | Написать  
10 сообщений из 35, страница 2 из 2
  2  все
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Сеттер проперти
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&startmsg=40011582&tid=2037900]:
 0ms
get settings:
 7ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 173ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 201ms
total:  471ms
созд. / загр.: 471ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]