Forum > Third party

IStringList...

(1/6) > >>

cdbc:
Hi
Well, I finally got my shijt together and done it  ::)
edit: new version out now 6.09.06.2024 which adds IStrings & support for observers.
For the longest time I've been missing an easy no frills way to do this:
--- Code: Pascal  [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---procedure TfrmIntfMain.btnUtf8Click(Sender: TObject);var lst: IStringList;begin  if dlgOpen.Execute then begin    lst:= CreateStrList;    lst.LoadFromFile(dlgOpen.FileName);    // do some processing of lst-data    Memo1.Clear;    Memo1.Caption:= lst.Text;  end;end; I mean without
--- Code: Pascal  [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---sl:= TStringlist.Create; try  // use the list finally  sl.Free;end;...and now finally(pun intended) I can  :D
You too if you so desire, I've made it public (i think) on my gitlab.
It's free for anyone to download and use, in the hope it can be of use to others.
Mind you, I'm not proficient in /gitlab'ing/ so I've tried my best to make it public...
Here it is: https://gitlab.com/cdbc-public/ibcstringlist
Enjoy  8-)
Regards Benny

Thaddy:
Benny, I am working on a small utility that parses a class for public methods and writes a COM based interface from that. Then rewrites the class header to include that interface. I will ping you when ready.
( I wanted that for years and picked it up again literally yesterday )

cdbc:
Hi Thaddy
Cool, that I'll be looking forward to  :)
...And today being today, I'll consider it a birthday-present, thank you  :D

--- Quote ---( I wanted that for years and picked it up again literaly yesterday )
--- End quote ---
I know exactly what you mean, but something always came up...
Regards Benny

Thaddy:
Happy Birthday!

cdbc:
Thanks mate :)

Navigation

[0] Message Index

[#] Next page

Go to full version