Delphi → Jak předat pole objektů do funkce?
V souvislosti s předchozím dotazem, jsem napsal tento kód - trochu zkrácený... procedure TForm1.otevriTest(filename: string); var f:textfile; s1, s3,pracadr,pom:string; i1,i2:integer; prehodit:boolean;...
View ArticleDelphi → Krach programu
Po ukončení testu se zapisují výsledky do souboru a poté se nastavuje proměnna caption a v ten moment to krachne: procedure TForm1.ulozit; var f:textfile; uspesnost,uspesnost0,muc,...
View ArticleDelphi → Jak obnovit ztracenou položku menu?
V Delphinu 7 se mi povedlo smazat položku Nástroje z menu a nevím jak to obnovit. Je to už uložené, takže to celé zmizlo. Mám tu původní verzi kde jsou původní zdroje... Dá se to nějak přesunout?...
View ArticleDelphi → Vytvoření formuláře z jiného formuláře?
Dá se vytvořit formulář tak že zkopíruju soubor pas a dfm? Já to tak udělal, zeditoval a teď jsem dostal hlášku Warning duplicate resources. Chtěl jsem si ušetřit práci ... Aktuální verze programu...
View ArticleDelphi → DBGrid vlastní vykreslení Titulní řádky
Ahoj, zaboha se nemůžu u DBGridu dostat na vlastní vykreslení titulního řádku a zvětšení výšky. Potřebuji 2 řádkové titulky, v prvním řádku jsou názvy sloupců ve druhém rozsah (max počet znaků textů)....
View ArticleDelphi → Využití .NET komponenty v Delphi
Ahoj, jakým způsobem se dá do Deplhi dostat namespace System.Security.Cryptography z MS .NET (https://msdn.microsoft.com/…phy.rijndael(v=vs.110).aspx)? Potřebuji v jednom projektu šifrovat. V...
View ArticleDelphi → Dá se listbox1.items zpracovat cyklem? Záměna slov.
Něco jako toto? for item in listbox1.items do begin item := stringreplace(listbox1.items, '; locked','zamknuto', [rfReplaceAll]); item := stringreplace(listbox1.items, '; lock','zamknuto',...
View ArticleDelphi → přidání dialogu pro otevření souboru
Zkopíroval jsem OpenDialog1 na OpenDialog2 a nakonfiguroval a zkompiloval a aplikace teď nejde spustit. Čím to je? Chyba ereaderror invalid property value. Špatně jsem nakonfiguroval options? I když...
View ArticleDelphi → filesize
Proč mi to ukazuje velikost souboru 3, když v souboru jsou textové data? if not fileexists(dir+'uc_heb.ini') then exit; try assignfile(f,dir+'uc_heb.ini'); reset(f); except showmessage('Nelze otevrit...
View ArticleDelphi → Jak přiřadit položku menu do objektu?
Připojen obrázek. Menu Testy: - TMenuItem.name = 'langHebrew1' TMenuItem.caption = 'Hebrejština' tomu odpovídající sub-menu Testy/Hebrejština/ - vybrat složku - : - TMenuItem.name =...
View ArticleDelphi → prosímn o radu k delete záznamů v DB
ahoj, narazil jsem na problémek při editaci číselníků v DB pomocí Query. Mám tabulku-číselník výrobních linek, když se pokusím smazat výrobní linku která nemá nikam vazbu/není nikde jinde použita,...
View ArticleDelphi → Instalace RichMemo v Lazarus
Zdravím, nejde mi nainstalovat RichMemo v Lazarusu. Netušíte prosím někdo co s tím? Překlad proběhne v pořádku ale při instalaci vyskočí chyba: "Sestavit IDE: Exit kód 512, Chyb:...
View ArticleDelphi → přístup k property vnořených objektů
Ahoj, potřeboval bych poradit snažím se vylepšit tvorbu reportů pomocí předdefinovaných šablon, šabloně potřebuji array nebo Tlist Objektů s property TCellProperty = class (TObject) private fName :...
View ArticleDelphi → Jaký je význam konstrukce Class of TNěco
Ahoj, v několika zdrojích na které jsem narazil při hledání na internetu se vyskytla konstrukce: type TNeco = class případně class(předek) ... end; TNecoClass = Class of TNeco; může my to někdo...
View ArticleDelphi → Delphi - Jak přehrat video přes VLC
Zdravím. Mam Delphi 10.1 Přidal jsem si přes activeX komponentu VLC. Nějak nemohu přijít na to, jak přes ní přehrat nějaké video. https://wiki.videolan.org/ActiveX/Delphi/...
View ArticleDelphi → Nabídka úvěrového úvěru v České republice kathleencassand80@gmail.com
Nabídka úvěrového úvěru v České republice kathleencassand80@gmail.com kathleencassand80@gmail.com Dobrý den, madam a pane. Nabízím půjčky komukoli, kdo nás může splácet s roční úrokovou sazbou ve...
View ArticleDelphi → Jak předat pole objektů do funkce?
V souvislosti s předchozím dotazem, jsem napsal tento kód - trochu zkrácený... procedure TForm1.otevriTest(filename: string); var f:textfile; s1, s3,pracadr,pom:string; i1,i2:integer; prehodit:boolean;...
View ArticleDelphi → počet čísel v poli
Zdravím, dokázal by mi někdo poradit jak mám v poli procedure novysal; var i,j: byte; begin for i:=1 to r do begin for j:=1 to s do begin ...Založil...
View ArticleDelphi → GDPR v delphi - ochrana údajů
Ahoj, chci se poptat jak řešíte GDPR - nakládání s osobními údaji od května letošního roku. Nějaké šifrování? V programu mám seznam osob s adresou, v delphi 7 - "tabulkový" formulář, s uložením do...
View ArticleDelphi → Otevření obrázku ze souboru
Začínám s Delphi a mám nainstalovanáno Delphi 7 a aplikaci win32 (okna)... A mám takový dotaz. Dejme tomu, že do aplikace dám obrázek, a po otevření (textového) souboru, kdy z toho souboru načtu...
View Article