- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Házimozi haladó szinten
- Azonnali informatikai kérdések órája
- NVIDIA® driverek topikja
- Házimozi belépő szinten
- 3D nyomtatás
- Hamarosan leszűkíti a támogatott hardvereit az NVIDIA
Új hozzászólás Aktív témák
-
D@ni88
addikt
Sziasztok.
ShellExecute(0, PChar('print'), PChar(APath), PChar('/t /s'), nil, 0);
Újabb fejlemény: Öröm és boldogság, mert ugye működik, de a tesztelés során olyan hibát találtam hogy kb a 50-100x shellexecute hívás után mintha nem történne semmi, nem nyomtat. (reader megnyílik)
-
D@ni88
addikt
válasz
Fire/SOUL/CD #1985 üzenetére
Csak elég nehéz több száz/ezer gépre telepíteni
-
D@ni88
addikt
válasz
Fire/SOUL/CD #1981 üzenetére
Ok, kipróbáltam, de minden nyomtatás után be kell zárnom a readert és csak azt követően nyitja meg az új pdf-et és küldi a nyomtatóra...
-
D@ni88
addikt
válasz
Fire/SOUL/CD #1981 üzenetére
Végül rájöttünk, hogy működik a story.
A probléma akkor áll fent, ha XPS writer, vagy Microsoft Office Document Image Writer van beálíltva alapértelmezett nyomtatónak. Ha fizikai nyomtató, akkor köpi rendesen a nyomtatványokat...Eléggé érdekes...
-
D@ni88
addikt
Sziasztok.
Még mindig nyomtatással szenvedek:
ShellExecute(0, 'open', 'acrord32', Pchar('/p /h c:\proba.pdf'), nil, 0);A parancs néha működik néha nem! Ha nem működik akkor is elküldi a readernek, megjelenik az open recent file-ok között, de nyomtatni nem nyomtat!
-
D@ni88
addikt
Sziasztok.
Szeretnék pdf-et nyomtatni delphiből
ShellExecute(0, 'open', 'acrord32', PChar('/p /h ' + 'c:\proba.PDF'), nil, SW_HIDE);
DeleteFile('c:\proba.PDF');parancs működik debugnál, ha elég időt várok, futásnál mire végigmenne a nyomtatási process, az előtt már törli is a fájlt, így a nyomtatás nem lehetséges.
A másik irány amin elindultam, hogy megvárjam a win process lefutását, de valamiért nem jön össze (még a fájl megnyitása sem:
procedure TTest_frm.bCloseClick(Sender: TObject);
var
Info: TShellExecuteInfo;
pInfo: PShellExecuteInfo;
exitCode: DWord;
begin
{Pointer to Info}
pInfo := @Info;
{Fill info}
with Info do
begin
cbSize := SizeOf(Info);
fMask := SEE_MASK_NOCLOSEPROCESS;
wnd := Application.Handle;
lpVerb := 'open';
lpFile := PChar('acrord32.exe');
{Parametros al executable}
{Executable parameters}
lpParameters := 'c:\proba.PDF';
lpDirectory := NIL;
nShow := 0;
hInstApp := 0;
end;
{Execute}
ShellExecuteEx(pInfo);
{Wait to finish}
repeat
GetExitCodeProcess(pInfo.hProcess,exitCode);
Application.ProcessMessages;
until (exitCode <> WAIT_TIMEOUT);
end;Esetleg valaki tudna segíteni?
-
D@ni88
addikt
Sziasztok.
Van egy lekérdezés ami kb 25000 sort ad vissza. Nincs semmi feltétel (select * from table).
BDE-vel azonnal megtörténik az Query.open míg ADOval kb 3-4s.
Valaki tudja mért lehet ez? Pedig ugye az ADO elvileg gyorsabb
-
D@ni88
addikt
Sziasztok.
Van egy delphi 6-s alkalmazás, kb 10 éves ami állandó szépítés és fejlesztés alatt áll.
Azt vettük észre, hogy egyes gépeken aránylag gyorsan, más gépeken viszont nagyon lassan működik az alkalmazás.
(Nem csak XP és Win7-en futás közt van különbség, hanem azonos oprendszerrel rendelkező gépeknél is).Logoltuk a lekérdezéseket, de úgy tűnik, hogy nem azok futtatásával van probléma. A select-ek futtatási ideje ~ megegyezik. Így arra gondolunk, hogy az adatok betöltésénél lehetnek problémák.
BDE-t használunk.
Tudnátok segíteni, hogy mi lehet a probléma?
Üdv Dani -
D@ni88
addikt
Mitől lehet az, hogy néhány gépen működik az ADO, néhányon pedig azt írja hogy a "Szolgáltató nem található. Lehetséges, hogy a telepítés nem volt tökéletes"
-
D@ni88
addikt
Vonalkódot kellene megjelenítenem (code128).
Delphiben hogy lehetséges? -
D@ni88
addikt
Sziasztok.
Szeretnék egy kétoldalas nyomtatványt létrehozni, aminek a hátoldalán mindig fix szöveg jelenne meg.
TQuickRep-pel hogy lehet ezt megoldani?Köszi
-
D@ni88
addikt
Sziasztok
StringGridből szeretném kinyerni az értékét.
i:= dbgDelivery.Cells[SelCol, SelRow];
mindig üres stringet kapok vissza attól függetlenül, hogy van e valami a mezőben..
Tudnátok segíteni?
Köszi
-
D@ni88
addikt
Sziasztok.
Ismét lenne egy kérdésem
Van egy jó régi programunk, ami belépés megkezdésekor csatlakozik az adatbázishoz.
A BDE-t használó Tquery objektumok a belépéskor létrejött adatbázis kapcsolatot használják.Most gondolkozunk az ADO-ra való átálláson, de ha TADOQuery-hez tartozó connectionstring megadásával csatlakozok akkor az létrehoz egy teljesen új oracle sessiont.
Meg lehet oldani, hogy a connection string megadása nélkül használjam a TADOQuery objektumot?
Köszi
Dani -
D@ni88
addikt
Kérlek segítsetek, hogy az alábbi kódban hol a hiba:
selQuery:=TADOQuery.Create(nil);
selQuery.ConnectionString:=connection;
try
{---assemble SQL statement}
selQuery.SQL.add('SELECT ID, CUSTOMER_SESSION_ID, IMAGE_NAME, IMAGE_DATA, IMAGE_COMMENT, ENABLED,'
+ ' CREATE_DATE, CREATE_USER_ID, MODIFICATION_DATE, MODIFICATION_USER_ID'
+ ' FROM IMAGES)
+ ' WHERE ID = :id');
selQuery.ParamCheck:=False;
selQuery.Parameters.ParamByName('id').Value:= 1;
selQuery.ExecSQL;Parameters sornál száll el....
Parameter 'id' not found; -
D@ni88
addikt
Sziasztok.
Képet szeretnék menteni oracle-be blob típusba
insertQuery.ParamByName('image_data').LoadFromStream(FImageStream, ftBlob);Ez lefut, de magánál a végrehajtásnál:
ORA-01460 unimplemented or unreasonable conversion requestedBDE 4.0 verzióját használjuk.
Ha az SQLORA32.dll-ről SQLORA8.dll-re váltunk megoldódik a probléma, de jelentősen lassul az alkalmazás.
Köszi
-
D@ni88
addikt
Sziasztok.
Delphiben hogyan lehet DateTime típusú változóhoz pl 1 percet hozzáadni?
Köszi Dani
-
D@ni88
addikt
Sziasztok.
A munkahelyemen sajnos Delphi 6-ban fejlesztünk. Arra lettünk figyelmesek, hogy maga a fejlesztett program sokkal gyorsabb XP-n mint Win7-en.
Esetleg nem tudjátok mitől lehet?
Köszi.Dani
-
D@ni88
addikt
amit mondtatok h nézzem meg, megnéztem, de hát az angol, én meg full hülye vagyok hozzá, szval még mindig nem értek semmit a delphihez
nem tudnátok másik e-bookot mondani? -
D@ni88
addikt
Hello, most tanuljuk a suliban a Delphi-t 5ös verzióval és fullra nem értem, ha valaki esetléeg megszánna egy elektronikus könyvvel, vagy valami hasonlóval nagyon megköszönném
Új hozzászólás Aktív témák
Hirdetés
- Gumi és felni topik
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Amazfit Active 2 NFC - jó kör
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- A OnePlus ellen biztonsági aggályok miatt indítanának vizsgálatot az USA-ban
- Opel topik
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Házimozi haladó szinten
- PlayStation 4
- További aktív témák...
- Eladó Apple Ipad Air 5 10 9 / M1 /WIFI + CELLULAR / 256GB Újszerű állapotban!
- GAMER PC RTX 3060 Ti 32GB RAM FULL HD / 1440p
- MSI Claw A1M 036 Konzol
- AKCIÓ!!! GAMER PC: Új i5-14400F +Új RTX 3080 +Új 16-64GB DDR4! GAR/SZÁMLA! 50 FÉLE HÁZ!
- HP Prodesk 600 G3 mini PC i5 7500T / WIFI / 8GB DDR4 / 256GB SSD / Type-C / 3x DP
- Csere-Beszámítás! RTX Gamer Számítógép PC Játékra! I5 12400F / RTX 3070 / 32GB DDR4 / 1TB SSD
- Bomba ár! Dell Latitude 5500 - i5-8GEN I 8GB I 256SSD I HDMI I 15,6" FHD I Cam I W11 I Garancia!
- Kingmax 2x2GB DDR3 RAM eladó
- ÚJ- Lenovo ThinkVision T24i-10 - 24" monitor - Számla, garancia
- Új! Targus - USB-C Dual HDMI 4K HUB - 2 HDMI-vel. Saját töltő nélkül 2 monitorral (120Hz)
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged