V čem se dá něco zprogramovat zadarmo ?
Znáte nějaký SW na tvorbu programů /aby to umělo udělat exe a mělo to grafické rozhranní? / Nemůžu najít tu delphi co byla v computeru a potřebuju něco zprogramovat. Nic sem nenašel musím si to udělat sám http://poradna.net/beta/thread.php?qst=15217#re-153 15. Vím ještě o free pascalu ale něco vhodnějšího.
Kdo to byl na stary poradne, jak vyhrozoval, ze nam vsem zprogramuje maily?
To byl pochopitelně kolega M.A.X.
jj na to sem tím názvem taky narážel
Ja jen ze to se mnou skublo a musel jsem se podivat poradne, kdo ten dotaz vlastne psal :)
A nasli radcove, nasli? Ja jsem taky sel hledat.. a nenasli.. vypada to, ze m.a.x. se uplne propadl do zeme, byl vymazan nebo mozna jeste spis uplne totalne zprogramovan..
Oči mě pálí hlava jak po deseti a zatím jsem nic nezprogramoval
. Lidi dobří pomozte nemůžu číst ty tlustý manuály...
Nejdřív jsem se pokoušel v Lazarusovi zprogramovat
prohledávání souborů a adresářů /i vícenásobných -potřebuju seznam souborů s cestou a velikost/ jenže jsme nebyli kámoši. Našel jsem doma potom tu delphi - no jenže prostě udělat to prolízání a výpis přes findfirst a findnext je docela problém, protože když jsou třeba 4úrovně adresářů tak sem byl v pr...
našel jsem na to thahfindfiles.zip, po půl hodině dostal do delphi -prej pět minut pche.. ale potřeboval bych help jak do z výpisu - z listboxu si to nacpat do proměnných /pole/. nebo aspoň jak to uložit do souboru a pak už si to snad načtu.
prostě tohle nějak ošéfovat ListBox1.Items := hahFindFiles1.SearchForFiles; abych to dostal po kouscích do pole.
thx
tak to máš jedno jestli jsou 4 nebo kolik, to se dělá rekurzí, viz: 00013.php
"
Ale aby pravdu, řekl nemam šajn, co myslíš tim: "dostat po kouscích do pole
já se snažil to napsat ručně to procházení adresáři ale nějak to nešlo -podle mě dost složité.tak sem našel hotové.v tom listoboxu je kupa odkazů na nalezený soubory a já to potřebuju nějak zpravovat.nejradši to mám v poli tohle[0-5000]:array of string
a proč nezustaneš u toho TStrings? To je "něco" jako array of string
[pas]procedure TForm1.Button1Click(Sender: TObject);
var Marta:TStrings;
begin
Marta := TStringsList.Create; // vytvoření
Marta :=ListBox1.Items; // výsledky do Tstrings
showmessage('Soubor číslo 13: '+Marta[12]); // a pracuješ s tim jako s normálním polem
showmessage(ListBox1.Items[12]);
Marta.Free; //uvolnění
end;
[/pas]
Napis mi co presne potrebujes