🚀 go-pugleaf

> Miałem (może) podobny przypadek, ale jednak ciut inny.
> Problem również dotyczył OpenDialog, ale zachowywało się to tak, że 
> otwarcie OpenDialog powodowało, że proces który go odpalił masowo zżerał 
> pamięć.
> I to w tempie ok. kilku MiB na sekundę.
> Tak czy siak normalna aplikacja umierała w kilkanaście minut od otwarcia 
> OpenDialog z braku pamięci.
> 
> Nie znaleźliśmy rozwiązania i w końcu zdecydowałem, że napiszemy sobie 
> taki wrapper na OpenDialog (jako osobny program/proces), którego jedynym 
> zadaniem jest obsługa OpenDialog.
> 
> Ciekawe jest to, że takie zachowanie było tylko u jednego klienta, ale 
> na wszystkich jego komputerach.

Czyli ten sam OpenDialog w czystym programie działał już poprawnie? Na 
szybko spojrzałem i kiedyś jak mi coś nie działało to starałem się 
skorzystać bezpośrednio z interfejsu IFileDialog, używałem też:
1. TOpenFileName(OFN.Flags := OFN_EXPLORER or OFN_LONGNAMES or 
OFN_FILEMUSTEXIST or OFN_PATHMUSTEXIST or OFN_HIDEREADONLY or 
OFN_DONTADDTORECENT or OFN_FORCESHOWHIDDEN;)
2. TBrowseInfo (browse_info.ulFlags := BIF_RETURNONLYFSDIRS;)
// or BIF_NEWDIALOGSTYLE; or BIF_USENEWUI; - not for multithreaded
3.TFileOpenDialog (OD.Options := [fdoPickFolders];).

-- 
Janek