- Argos: Adjátok vissza a netet! - szeretnék elaludni!
- gban: Ingyen kellene, de tegnapra
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Luck Dragon: Asszociációs játék. :)
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- weiss: Logi MX Master 3S FW NEM frissítés
- btz: Internet fejlesztés országosan!
- MasterDeeJay: Alacsony fogyasztású házi szerver a korábbi projektekből összeépítve
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
Hirdetés
Ú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)
-
#1986
D@ni88
addikt
Fire/SOUL/CD
#1985
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
-
#1984
D@ni88
addikt
Fire/SOUL/CD
#1981
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...
-
#1982
D@ni88
addikt
Fire/SOUL/CD
#1981
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.
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 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
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
Új hozzászólás Aktív témák
Hirdetés
- OLED TV topic
- Abarth, Alfa Romeo, Fiat, Lancia topik
- Házimozi belépő szinten
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Fotók, videók mobillal
- Argos: Adjátok vissza a netet! - szeretnék elaludni!
- Star Wars rajongók
- gban: Ingyen kellene, de tegnapra
- Óra topik
- Revolut
- További aktív témák...
- Hisense U5120GW 5.1.2 csatornás Hangprojektor 510 W teljesítmény -Dolby Atmos és DTS:X támogatás
- T16 Gen2 16" FHD+ IPS i7-1365U 16GB 1TB NVMe magyar vbill ujjlolv IR kam gar
- Apple iPhone 13 Mini 128GB, Kártyafüggetlen, 1 Év Garanciával
- Eladó szép állapotban levő Apple iPhone 8 Plus 64GB / 12 hó jótállással
- Apple iPhone 14 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
- HIBÁTLAN iPhone 13 Pro 256GB Silver -1 ÉV GARANCIA - Kártyafüggetlen, MS3101
- Eladó karcmentes Apple iPhone 12 128GB / 12 hó jótállással
- Eladó Új állapotban lévő Xiaomi Redmi 13C 4/128GB / 12 hó jótállás
- Nexigo PJ40 okosprojektor / Számla + Garancia /
- LG 39GS95UE - 39" Ívelt OLED / QHD 2K / 240Hz & 0.03ms / 1300 Nits / NVIDIA G-Sync / AMD FreeSync
Állásajánlatok
Cég: FOTC
Város: Budapest