AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Apache Modul blockiert bei zip

Apache Modul blockiert bei zip

Ein Thema von AndreasSt · begonnen am 14. Mär 2023 · letzter Beitrag vom 16. Mär 2023
Antwort Antwort
AndreasSt

Registriert seit: 10. Mär 2021
18 Beiträge
 
#1

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 08:33
Mir ist beim kopieren des Quelltextes ein Fehler unterlaufen.
In der function TWebModule1.getDBResponse:string;
wird am Schluss noch folgendes gemacht:
try
MyAdoQuery.Free;
MyADOConnection.Connected:=False;
MyADOConnection.Free;
finally
CoUninitialize;
end;

Da das webmodul ja xfach aufgerufen wird gibt es ja nicht den einen Hauptthread.
Das heißt ich komme ja immer aus dem Handler raus.
was ist der Unterschied zwischen
CoInitializeEx(nil,COINIT_APARTMENTTHREADED);
und
CoInitializeEx(nil,COINIT_MULTITHREADED);

Gruß
  Mit Zitat antworten Zitat
AndreasSt

Registriert seit: 10. Mär 2021
18 Beiträge
 
#2

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 08:34
ms.free ist eigentlich contentStream.free;
Auch ein Kopierfehler
  Mit Zitat antworten Zitat
Benutzerbild von Olli73
Olli73

Registriert seit: 25. Apr 2008
Ort: Neunkirchen
777 Beiträge
 
#3

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 08:48
Also ich nutzte CoinitilazeEx sowohl im Haupt- als auch in den anderen Threads, und zwar mit COINIT_APARTMENTTHREADED.
  Mit Zitat antworten Zitat
AndreasSt

Registriert seit: 10. Mär 2021
18 Beiträge
 
#4

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 09:17
Hallo Olli,
Danke für die Rückmeldungen.
Setzt du in der dpr des Webmoduls das CoInitflags auf COINIT_APARTMENTTHREADED?
Also statt:

begin
{$IFDEF MSWINDOWS}
CoInitFlags := COINIT_MULTITHREADED;
{$ENDIF}
Web.ApacheApp.InitApplication(@GModuleData);
Application.Initialize;
Application.WebModuleClass := WebModuleClass;
Application.Run;
end.

dies hier:

begin
{$IFDEF MSWINDOWS}
CoInitFlags := COINIT_APARTMENTTHREADED;
{$ENDIF}
Web.ApacheApp.InitApplication(@GModuleData);
Application.Initialize;
Application.WebModuleClass := WebModuleClass;
Application.Run;
end.
  Mit Zitat antworten Zitat
Benutzerbild von Olli73
Olli73

Registriert seit: 25. Apr 2008
Ort: Neunkirchen
777 Beiträge
 
#5

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 12:56
Ich rufe in der dpr auch CoInitilizeEx(COINIT_APARTMENTTHREADED) auf.
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.555 Beiträge
 
Delphi 7 Professional
 
#6

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 13:20
Bei mir sieht das im Prinzip so aus:
Delphi-Quellcode:
unit WebModule1derWieSieAuchImmerHeißenMag;

interface

// Hier jetzt alles, was so implementiert wurde ...


initialization
  // Das wird für ADO dringend benötigt.
  CoInitializeEx(nil,COINIT_MULTITHREADED);

finalization
  CoUninitialize;

end.
Mein Erfahrung: CoInitialize sollte nur einmal aufgerufen werden und nicht bei jeder Anfrage ans Webmodul erneut.
  Mit Zitat antworten Zitat
AndreasSt

Registriert seit: 10. Mär 2021
18 Beiträge
 
#7

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 15:09
Hallo,
Könntest du mir mal Auszüge aus deiner dpr und aus dem eigentlichen Webmodul schicken? Notfalls auch als nachricht.
Danke
  Mit Zitat antworten Zitat
Delphi.Narium

Registriert seit: 27. Nov 2017
2.555 Beiträge
 
Delphi 7 Professional
 
#8

AW: Apache Modul blockiert bei zip

  Alt 15. Mär 2023, 15:45
Habe halt nur Delphi 7 und dort sieht eine typische dpr bei mir sinngemäß so aus:
Delphi-Quellcode:
library WebProjekt;

uses
  ActiveX,
  ComObj,
  ISAPIThreadPool,
  ISAPIApp,
  WebModuleUnit1 in 'WebModuleUnit1.pas{wm: TWebModule},
  BrkrConst in '..\..\..\Delphi7\Source\Internet\BrkrConst.pas',
  WebBroker in '..\..\..\Delphi7\Source\Internet\WebBroker.pas',
  ... und weitere Units, sofern erforderlich
  ;

{$R *.res}

exports
  GetExtensionVersion,
  HttpExtensionProc,
  TerminateExtension;

begin
  CoInitFlags := COINIT_MULTITHREADED;
  Application.Initialize;
  Application.CreateForm(Twm, wm);
  Application.Run;
end.
Die Unit WebModuleUnit1 beginnt mit
Delphi-Quellcode:
unit WebModuleUnit1;

interface

uses
  HTTPApp,
  HTTPProd,
und endet mit
Delphi-Quellcode:
initialization
  // Das wird für ADO dringend benötigt.
  CoInitializeEx(nil,COINIT_MULTITHREADED);

finalization
  CoUninitialize;

end.
Der Webserver ist ein Eigenbau mit Hilfe der Indykomponenten und diesen Komponenten, für die Nutzung von ISAPI-Dlls bzw. CGI Programmen ID: 17810, idRunner 3.3 - ISAPI and CGI scripts support for Indy, erstellt.

Alles schon was älter, daher ist nicht auszuschließen, dass das Verhalten, im Zusammenspiel mit Apache, nicht absolut identisch ist.
  Mit Zitat antworten Zitat
Antwort Antwort

 
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:50 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz