- Crypto Trade
- Az iPadOS-re írt appokra is díjat vet ki az Apple
- Milyen NAS-t vegyek?
- Sokat fogyaszt az AI, egyre több az adatközpont, kell az atomenergia
- A franciáknak elege van abból, hogy minden gyerek mobilozik
- A pápa egyre jobban tart a romlott AI veszélyeitől
- Letartóztatták a bitcoin-Jézust
- SkyShowtime
- WLAN, WiFi, vezeték nélküli hálózat
- foobar2000
- gban: Ingyen kellene, de tegnapra
- Szevam: Érzelmi magabiztosság/biztonság - miért megyünk sokan külföldre valójában?
- bb0t: Gyilkos szénhidrátok, avagy hogyan fogytam önsanyargatás nélkül 16 kg-ot
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
Aktív témák
-
Attila1981
csendes tag
Hello!
Segítségeteket kérem! Van egy HTML oldalam amit be szeretnék illeszteni egy Delphi alkalmazásba. Azt szeretném hogy egy gomb megnyomására a HTML oldal jöjjön elő. -
Tele von Zsinór
őstag
Ha jól tévedek akkor te a TWebBrowser-t keresed, és a res:// protokollt.
-
Attila1981
csendes tag
Elöször is köszönöm a segítő választ. Szeretném megkérdezni, hogy mi a megoldás a következő példára. Egy Delphiben megírt programomban videóbejátszás is szerepel. Egy gomb megnyomására indul el. Az a problémám ha megállítom a videóbejátszást eltűnik a delphi videóbejátszó ablaka. Ilyenkor az összes megnyitott ablak mögé kerül. Azt szeretném megoldani, hogy ha megállítom a videóbejátszást, akkor ne tűnjön el.
-
Tele von Zsinór
őstag
Próbáld meg a megállítás eseményét lekezelni (ha van olyan, de asszem van), és egy form.bringtofront-ot meghívni.
-
Attila1981
csendes tag
Most viszont az Outlookkkal van gondom.
Azt szeretném megcsinálni hogy az email címemre kattintva bejöjjön az Outlook, és rögtön az email címem egy Új üzenet írásában.
Eddig ezzel próbálkoztam de ez csak megnyissa az outlookot.
uses ShellApi;
procedure ..........gombClick..;
begin
ShellExecute(handle,nil,' outlook.exe',nil,nil, SW_SHOWNORMAL);
end; -
Diskcopy
tag
válasz Attila1981 #5 üzenetére
így nem jó?
shellexecute(handle,nil,'mailto:email@cimed.hu',nil,nil,SW_SHOWnormal);
hoppsz.. a subject lemaradt... email @cimed.hu?Subject=Ez lesz a levél tárgya'
[Szerkesztve] -
kiskekes
csendes tag
Bocs hogy amatőr kérdéssel jövök, de most kezdem tanulni a Delphit!
Szóval ebben a progiban miért nem hajlandó beolvasni a ch változót, ha az char típusú?? (1-et és 2-t szeretném +al illetve -al helyettesíteni)
uses
SysUtils;
var
a, b, e: real;
ch: integer;
begin
e:=0;
a:=0;
b:=0;
repeat
write('a:'); read(a);
write('b:'); read(b);
write('ch:'); read(ch);
case ch of
1 : e:=a+b;
2 : e:=a-b;
end;
write(e);
until e=100;
{ TODO -oUser -cConsole Main : Insert code here }
end.
[Szerkesztve] -
Drótszamár
őstag
A Delphinek van edit komponense, azzal tudsz beolvasni. Sztem a read, meg a write nem működik. Mire írná ki az eredményt?
Tegyél a form-ra egy labelt, és label.caption:=''kiirandó szöveg''. Így tudsz kiiratni.
Esetleg egy szövegdobozba is tudsz.
Ha nem világos kérdezzél nyugodtan.
Ja és van egy másik többszáz HSZ-es Delphi topic. Nem jó ha 2 helyen vannak a dolgok. Inkább azt kéne használni.( 2b || !2b ) az itt a kérdés...
-
kiskekes
csendes tag
válasz Drótszamár #9 üzenetére
Egyszerűen csak az e értékét kellene kiírnia, és ha ch integer akkor simán működik a progi, viszont ha char (és ez lenne a cél) akkor a ch-t egyszerűen meg sem kérdezi. (amiket írtál, szövegdoboz... nem nagyon értem, de sztem most nekem nincs arra szükségem) Mellesleg itt a progi:
Bővebben: link , ezen a 31-37 oldal. Eléggé kezdeti stádiumban vagyok.
Megpróbálok ezentúl a másikba írni
[Szerkesztve] -
Drótszamár
őstag
Aha most már értem mihez kell ez.
Hát ilyen konzol alkalmazást még soha nem írtam, de valszeg nem is nagyon lessz rá szükségem.
Ha ilyen programokat akarsz írkálni, akkor ajánlom inkább a Turbo Pascalt.
Azon a nyelv szintaktikáját remekül meg lehet tanulni.
Ha mindenképpen Delphivel akarsz foglalkozni, akkor szerintem inkább a form-os dolgokkal kezdjél el foglalkozni.( 2b || !2b ) az itt a kérdés...
-
ReJim
őstag
Bővebben: link
elöbb keresni kellett volna... tök felesleges még egy delphis topik..</end.?>
-
btotyi
tag
Csak látszólag nem működik mert beolvassa az előző számhoz tartozó entert is. A char típus pedig ordináris típus így nyugodtan használgatod a case-ben is.
Repeat
write('a:'); read(a);
write('b:'); read(b);
repeat
read(ch);
until ch <> #13;
write('ch:'); read(ch);
Case ch Of
'-' : e := a + b;
'+' : e := a - b;
End;
WriteLn(e);
Until e = 100; -
Attila1981
csendes tag
A program amin dolgozom tartalmaz egy Névjegy ablakot.
Na most ez a Névjegyablak mindig elindul amikor elindítom a programomat, és a háttérbe lapul valahol. Ha viszont a programomban a névjegyet szeretném előhozni akkor előjön a Névjegyablak de nem aktív az egyetlen gomb rajta, igy be se tudom csukni a Névjegyablakot. Csak ugy tudom becsukni ha becsukom a formomat amiről elindította.Ez mind azért van mert a háttérbe van valahol induláskor. Nem adtam meg neki hogy elindulkon.
Akkor mégis hol van beíródva, mert már átrágtam magam az egész programon és nemtalálom. -
Drótszamár
őstag
válasz Attila1981 #14 üzenetére
Project--> Options--> Form fül --> Autocreate Forms
Na amik itt vannak felsorolva, azok automatikus létrejönnek, és ''elbújnak''.
Szedd ki innen azt ami nem kell.
Egyébként névjegyform.showmodal az nem segítene?( 2b || !2b ) az itt a kérdés...
-
Drótszamár
őstag
Bővebben: link
[Szerkesztve]( 2b || !2b ) az itt a kérdés...
-
WN31RD
addikt
válasz Drótszamár #16 üzenetére
Ennek örömére zártam ezt a topicot.
''... we as consumers want our content free (as in Freedom) and if we don't get it, we'll take our content free (as in beer).''
Aktív témák
- Ryzen 9 5950X
- AirPods Max - Silver (Hibátlan és tökéletes állapot, tulajdonképpen új, pár napot volt használva)
- LEGJOBB ÁR! GAMER PC - RTX 3070 - Ryzen 5500 - 16GB DDR4 - 500GB Nvme SSD
- ÚJ Playstation 5 CFW képes (feltörhető), lemezes
- ÚJ Dell Vostro 3520 - 15.6" IPS 120Hz / i5-1235U / 8-16Gb DDR4 / 512Gb / HUN backlit / 3 ÉV GAR.
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Promenade Publishing House Kft.
Város: Budapest