Ciao, ho sviluppato un piccolo programma in delphi utilizzando web Broker. VOrrei sapere come posso effettuare il debug su un applicazione web. Ho letto anche ciò che mi dice l'help di Delphi, ma mi è poco chiaro. Il mio programma produce una DLL. Qui sotto lascio in programma per darvi un idea piu dettagliata. Inoltre aggioungo che il tag <#data> vine sostituito in una pagina web definita in locallhost.
unit Esempio1;
interface
uses
SysUtils, Classes, HTTPApp, HTTPProd, windows, Dialogs;
type
TWebModule1 = class(TWebModule)
PageProducer1: TPageProducer;
procedure PageProducer1HTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings;
var ReplaceText: String);
private
{ Private declarations }
public
{ Public declarations }
end;
var
WebModule1: TWebModule1;
implementation
{$R *.dfm}
procedure TWebModule1.PageProducer1HTMLTag(Sender: TObject; Tag: TTag;
const TagString: String; TagParams: TStrings; var ReplaceText: String);
begin
if TagString = 'Data' then
begin
ReplaceText := DateToStr(Now);
end;
end;