Monday, May 7, 2018

Delete files in Delphi


http://wiki.freepascal.org/mysql


I checked the readonly property of the files. The directory d:\multifilter was write-protected (I could not change this) but all files in it could be manipulated ad libitum.
So I checked if with inclusion of
Code: Pascal  [Select]
  1. deletefile(d:\multifilter\b0.jpg);
at the beginning of the program b0.jpg was deleted, ok.

Also
Code: Pascal  [Select]
  1. files:='d:\multifilter\');
  2. deletefile(files+'b1.jpg');
worked.

Also
Code: Pascal  [Select]
  1.   files:='d:\multifilter\');
  2.   n:=2;
  3.   Str(n,nstring);
  4.   fbstring:=files+'b'+nstring+'.jpg';
  5.   deletefile(fbstring);
worked!

Also
Code: Pascal  [Select]
  1.   for n:=0 to nmax-1 do
  2.   begin
  3.   Str(n,nstring);
  4.   fbstring:=files+'b'+nstring+'.jpg';
  5.   deletefile(fbstring);
  6.   end;
worked!!!

But the deletefile() directly before the savefile() (as discussed before) later on in the program does not work. Very rare! (The savefile() alone did not overwrite the old files - this was the cause of the whole problem).
So, I put the deletes at the first possible place (when it is clear if and how many files have to be deleted). And it works!




-------------




Example code : Try to delete a file twice
var
  fileName : string;
  myFile   : TextFile;
  data     : string;

begin
  // Try to open a text file for writing to
  fileName := 'Test.txt';
  AssignFile(myFile, fileName);
  ReWrite(myFile);

  // Write to the file
  Write(myFile, 'Hello World');

  // Close the file
  CloseFile(myFile);

  // Reopen the file in read mode
  Reset(myFile);

  // Display the file contents
  while not Eof(myFile) do
  begin
    ReadLn(myFile, data);
    ShowMessage(data);
  end;

  // Close the file for the last time
  CloseFile(myFile);

  // Now delete the file
  if deletefile(fileName)
  then ShowMessage(fileName+' deleted OK')
  else ShowMessage(fileName+' not deleted');

  // Try to delete the file again
  if deletefile(fileName)
  then ShowMessage(fileName+' deleted OK again!')
  else ShowMessage(fileName+' not deleted, error = '+
                   IntToStr(GetLastError));
end;
Show full unit code
   Hello World
   Test.txt deleted OK
   Test.txt not deleted, error = 2

Wednesday, May 2, 2018

Aplikacije Otvarač i Tragač za Microsoft Windows preuzete više od 20.000 puta do danas

I

Aplikacija Tragac - Aplikacija Tragach - Tragac++6 - Download

Aplikaciju TRAGAČ za Microsoft Windows 7, 8, 10 možete svuda da nosite sa sobom jer je to portable aplikacija koja se ne instalira.

Znači slobodno je možete prekopirati na memory stick ili memorijski fleš i koristiti je svuda gde god da se zateknete.

Aplikacija Tragac za Windows Vam omogucuje da na svakom uredjaju na kome je pokrenete preuzmete spisak svih datoteka u tekstualnom obliku i to koristite kao dokazni materijal.



Aplikaciji Tragač  (Ultimate Treker++6) ne trebaju administratorska prava da bi radila.




II

Aplikacija OTVARAC je svojevrstan TimeLine za otvarane dokumente i aplikacije u Windowsu, ali ne kao što je to Microsoft zamislio, nego prikazuju samo ono što Vi otvorite aplikacijom Otvarač. 

Aplikacija Otvarac - Aplikacija Otvarach - Aplikacija Otvarac2 - Download


Tako je preglednost mnogo bolja, a dokumenti se lakše nalaze.



Aplikacije Otvarač i Tragač za Microsoft Windows preuzete više od 20.000 puta do danas !

Wednesday, April 25, 2018

Puppy Linux HPLIT

http://www.murga-linux.com/puppy/viewtopic.php?t=27519

ili podešavanje drajvera HP štampača pod linuxom preko Wizarda (Ćarobnjaka bre).

Viđi čuda u linuxu jedan drajver pokriva celu gamu HP laserskih štampača (mogli bi reći skoro sve), a ne kao u Windows-u instalacioni CD/DVD za svaki od njih sa drajverima.


Ako kojim slučajem imate Canon štampač onda otiđite na njihov sajt i potražite LINUX drajvere.


**************

Pogledajte moje ranije postove gde sam pominjao kako se HPLIT podešava za XUBUNTU (jednostavno da jednostavnije ne može).

Jedina je mana što je XUBUNTU normalan OS instaliran na hard disku, a prednost Puppy Linuxa je što radi pokrenut sa USB-a ili CD-a i potpuno radi u RAM memoriji, odnosno, ne mountuje hard disk.

Ipak XUBUNTU je pravi mišonja:


-hoću reći, može da se provuče i prodje u svakoj kancelariji za džabaka.


Evo kako se to radi na XUBUNTU linuxu:

http://beogradsko.blogspot.rs/2018/02/hp1010-on-ubuntu.html

A sada jedna neverovatna live distribucija sa puno aplikacija u svega 50-300MB:

https://sourceforge.net/projects/gparted/files/old-gparted-livecd/gparted-livecd-0.3.4-11/

https://linuxmint.com/edition.php?id=252

https://www.youtube.com/watch?v=eoxluItj1uA




https://help.ubuntu.com/community/NetworkPrintingWithUbuntu?


http://www.samsungdrivers.net/samsung-m2070-driver/

SAMSUNG multifunkcijski laserski štampač SL-M2070 Laser, A4


Štampač koji radi i pod linuxom, a radi i kao skener i fotokopir.

RTOS:

http://docs.zephyrproject.org/getting_started/getting_started.html

http://chronoslinux.org/wiki/Main_Page


fbxkb za Puppy Linux

Svi već znate da dodajete i menjate jezike pri pisanju teksta u Windows-u, ali da li znate u linuxu ?

Nećete verovati, ali to je pored podešavanja printera najčešći problem koji Windows korisnike drži podalje od Linux-a. Skoro 90% korisnika Windows-a odustane od Linux-a čim se susretne sa samo ova dva problema.

*Windows način pod Linuxom (da ne isprepadate Windows korisnike):

http://puppylinux.org/wikka/fbxkb




*Lepši linux način (srčani udar za Windows korisnike):


1) Napravite jedan fajl pomoću text editora.

2) Kliknite desni taster na taj fajl i odaberite u Properties da čekirate svuda gde piše exec, kako bi se ovaj fajl izvršavao u Vašem Puppy Linux-u.

3) Pomoću tekst editora u taj fajl upišite sledeće:

setxkbmap -layout us


Ponovite gornju proceduru u tri koraka i napravite još jedan fajl koji treba da sadrži sledeću liniju teksta:

setxkbmap -layout sr


Kada kliknete da izvršite prvi fajl imaćete američki lejaut za pisanje engleskih slova, a kad kliknete na drugu ikonicu imaćete srpsku ćirilicu i uopšte ne morate podešavati keyboard layout u settingsu Puppy Linuxa, sa dve ikonice imate dva jezika dostupna za sve tekstualne aplikacije.

fbxkb Vam omogućuje da menjate jezike pomoću zastavica kao u Microsoft Windowsu, ali i ovo lepo radi.

A što je najlepše korisnici Windows-a će da polude kada vide da jezik menjate klikom na ikonicu u filemanageru.

Možete u jednom folderu imati gomilu ikonica gde svaka aktivira drugi jezik.

Korisnici Windows-a tako nešto u životu nisu videli, haha.






A sad nesto sasvim drugacije, live distro zasnovan na Slackware linuxu:

https://distrowatch.com/table.php?distribution=austrumi

Monday, April 23, 2018

Kancelarijske aplikacije koje imaju potpuno originalne funkcionalnosti potrebne svakoj ozbiljnoj kancelariji današnjice

Kancelarijske aplikacije za Windows 7, 8, 10:

Kancelarijske aplikacije koje nigde niste videli. Kancelarijske aplikacije koje imaju potpuno originalne funkcionalnosti potrebne svakoj ozbiljnoj kancelariji današnjice.

Mislite da ste sve videli i probali na računaru, ipak niste u pravu: 

Aplikacija OTVARAC je svojevrstan TimeLine za otvarane dokumente i aplikacije u Windowsu, ali ne kao što je to Microsoft zamislio, nego prikazuju samo ono što Vi otvorite aplikacijom Otvarač. 

Aplikacija Otvarac - Aplikacija Otvarach - Aplikacija Otvarac2 - Download

Tako je preglednost mnogo bolja, a dokumenti se lakše nalaze.

Aplikacija Tragač sa druge strane pronalazi sve datoteke, čak i one hijerarhijski zavučene i ugnježdene u mnogim subfolderima, a rezultat pretrage za razliku od drugih sličnih alata možete da snimite kao dokazni materijal sa svim folderskim putanjama u neki tekst dokument, npr. Microsoft Word.

Aplikacija Tragac - Aplikacija Tragach - Tragac5 - Download

Za razliku od aplikacije OTVARAČ, aplikaciju TRAGAČ za Microsoft Windows 7, 8, 10 možete svuda da nosite sa sobom jer je to portable aplikacija koja se ne instalira.

Znači slobodno je možete prekopirati na memory stick ili memorijski fleš i koristiti je svuda gde god da se zateknete.

Aplikacija Tragac za Windows Vam omogucuje da na svakom uredjaju na kome je pokrenete preuzmete spisak svih datoteka u tekstualnom obliku i to koristite kao dokazni materijal.

S druge strane aplikaciju OTVARAC morate instalirati, a za tu operaciju su Vam neophodna administratorska prava.

Aplikaciji Tragač ne trebaju administratorska prava da bi radila.

Zaista je pravo čudo da se niko nije setio metoda na koji rade ove dve aplikacije.

Zamislite koliko se novca vrti u IT industriji, a niko od programera nije imao ni na kraj pameti ovako korisne ideje u razvoju softvera.

Morate i sami priznati da su aplikacije krajnje originalne i korisne u svakom pogledu.


Evo jedne hipotetičke situacije, Vi ste npr. novinar i na računaru čuvate lepo razvrstane članke po raznim folderima, dolazi Vam šef i pita šta ste u poslednje tri godine pisali, za samo par minuta dobijate pregledan spisak sa svim putanjama na Vašem računaru, storidžu, serveru, disku ili šer folderu gde se nalaze svi Vaši dokumenti.

Evo druge hipotetičke situacije, vi ste full-stack programer, dolazi Vam šef i pita šta ste radili od aplikacija u C# poslednjih sedam godina, za samo nekoliko minuta dobijate detaljne putanje i nazive svih datoteka svih Vaših foldera ili projekata.

Evo treće hipotetičke situacije, Vi ste ćata dolazi Vam inspekcija, nadam se da ste shvatili poentu.

Lepo je ručno kopipastirati, ali zašto ne bi pustili računar da sve to automatski pronadje umesto Vas.

Aplikacije možete pokrenuti i iz linuxa, ukoliko koristite Wine emulator.
Kao što znate ne rade sve Windows aplikacije pod Wine-om, ali Tragač radi sigurno, jer je portable aplikacija.



Thursday, April 19, 2018

Web development Package for Free Pascal/Lazarus

Web development Package for Free Pascal/Lazarus

Free Spider is an object oriented web development package for Free Pascal / Lazarus. It is similar to Delphi’s web broker /WebSnap technology.

You can build web applications using Lazarus and deploy it in Linux, and Windows, and Mac.
You will get the benefits of Lazarus rich OOP features and database components to connect to FireBird, MySql, or PostgreSQL.
Your web application will be cross-platform.
It is easy to deploy Lazarus CGI web application executable or Apache Module library which are native to all platforms and need no additional libraries in deployment.
You will get a secure binary executable file/Library that you deploy in the server, and no one in server side could corrupt your code.
Built-in Automatic multipart/form-data decoder for uploading/downloading files
Smart Module Loading design enables you to split the design of your web applicaiton into many logical parts, This will facilitate team work, make your application readable and easy for maintinace

Components:
TSpiderCGI : Is used for CGI application
TSpiderApache : Is used for Apache Module application
TSpiderAction: Is used to receive requests and reply to different Paths
TSpiderPage: Is used with external HTML templates and to link it to active contents
TSpiderForm: It generates HTML form using OOP methods like SpiderForm1.AddInput(itText,, etc
TSpiderTable: Is used to generate HTML table from dataset or manually using OOP method like: SpiderTable1.AddRow(‘Yellow’, [‘One’, ‘Two’, Three’]);

http://code.sd/freespider/

https://forum.lazarus.freepascal.org/index.php?topic=7439.0


Svi koji su imali posla sa Microsoft serverskom arhitekturom i velikim brojem klijenata na istom znaju koje su prednosti ekvivalentnih Linux serverskih rešenja i Apache tehnologije nasuprot kabastom Microsoft IIS-u. S obzirom da je do skora i Azure bio kompletno Windows orijentisan, sa host podrškom za Linux, situacija se menja i zbog brzine, sigurnosti i broja podržanih konekcija i Microsoft uvodi jedan kompletan lejer izgradjen u Linux-u i to kod nove Azure Sphere tehnologije za oblake. Tako da Azure od hostinga prelazi na strukturno usvajanje Linux-a, kao sloja sigurnosti u svojim budućim klaud tehnologijama.

Cilj nam je da razbijemo famu oko superiornosti C#.net, .net frameworka, ASP.net i ostalih djakonija iz Microsoft kuhinje i da predstavljajući alternativna opensource rešenja nateramo na razmišljanje zombi microsoft orijentisane glave. Na taj način provetravamo im ustajale mozgove u Microsoft žabokrečini. Jeste da zaradjujete mnogo, ali potrebno je da izadjete na slobodno open source sunce ponekad, nije sve u novcu.

I sam Microsoft je shvatio da je Linux server mnogo brži i kvalitetniji od Azure i sličnih rešenja, pa je napravio svoju varijantu linuxa kao jedan sloj zaštite svojih Azure Sphere serverskih rešenja:
"

For the first time ever, Microsoft will distribute its own version of Linux

"


http://www.businessinsider.com/microsoft-azure-sphere-is-powered-by-linux-2018-4

Wednesday, April 18, 2018

Najbolji kros-kompajler današnjice a da nije iz Microsoft kuhinje

Lazarus Code and Component Repository

https://sourceforge.net/projects/lazarus-ccr/files/?source=navbar


------------


Lazarus - Rapid applications development tool and libraries for FPC

https://sourceforge.net/projects/lazarus/files/Lazarus%20Windows%2032%20bits/


--------------


https://www.lazarus-ide.org/

Lumberyard Game Engine

Zašto je aplikacija tragač brža od sličnih aplikacija ?

Aplikacija Tragač 6 (bare metal) je brža od ostalih sličnih aplikacija, uključujući i Windows Search i TotalCommander, jer ne otvara datoteke dok vrši pretragu. Na ovaj način operativni sistem veoma brzo lista sve datoteke po odredjenom kriterijumu mnogo brže nego inače.

U pripremi je i Aplikacija Tragač Sokoćalo (bare metal) koja će vršiti dve pretrage gotovo istovremeno (konkurentno) i omogućiće da se pretražuju delovi teksta unutar datoteka koje su predmet pretrage.

Dok aplikacija Tragač 6 vrši pretragu tražeći neku reč u nazivu datoteke po standardom wildcard principu (upotreba *, koju smo ranije objasnili), Sokoćalo će tražiti i sadržaje unutar datoteke, bez obzira na njen tip ili da li se radi o binarnoj ili tekstualnoj datoteci.

Postojaće obe aplikacije za preuzimanje, jer jedna radi brže, a druga sporije, jedna radi po wildcard principu, a druga po mnogo više kriterijuma.