🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: pl.comp.lang.delphi
3 messages
3 total messages Started by Pawlak, Pawel Wed, 10 Oct 2001 14:54
RE: Jeszcze raz WebBrowser (czytajcie tylko początek)
#126603
Author: Pawlak, Pawel
Date: Wed, 10 Oct 2001 14:54
59 lines
3055 bytes

> -----Original Message-----
> From: RaNo [mailto:ranologo@poczta.fm]
> Subject: Jeszcze raz WebBrowser (czytajcie tylko początek)
> 
> 
> W procedurze zdarzeniowej onBeforeNavigate mam parametr pDisp.
> 
> W helpie z MSDN (którego zamieszczam na końcu mojego listu) znajduję:
> 
> <cytat>
> When reissuing a navigation for the WebBrowser object,
> the Stop method must first be executed for pDisp.
> </cytatu>
> 
> Pytanie: Jak wykonać "Stop dla pDisp"?


<CODE>
uses ActiveX;

procedure TForm1.WebBrowser1BeforeNavigate2(...; 
                                            const pDisp: IDispatch;
                                            ...);
var
  Names     : array [0..0] of PWChar;
  StopName  : WideString;
  DispIDs   : array [0..0] of Integer;
  Params    : TDispParams;
const
  IID_NULL : TGuid = '{00000000-0000-0000-0000-000000000000}';
begin
  StopName:='Stop';
  Names[0]:=PWChar(StopName);
  if pDisp.GetIDsOfNames(IID_NULL,@Names,1,0,@DispIds)=S_OK then
  begin
    Params.cArgs:=0;       //Stop to bezparametrowa procedura
    Params.cNamedArgs:=0;
    pDisp.Invoke(DispIDs[0],IID_NULL,0,DISPATCH_METHOD,Params,nil,nil,nil);
  end;
end;
</CODE>

Wystarczy? Czy mam tłumaczyć co i jak? :))

Pozdrawiam,
Morris


PS.
  W temacie Excela 95 - powyższe to hint, jak do niego podejść :)
Właśnie przez "ręczną" zabawę z IDispatch, bo inaczej nie idzie...
Z tym, że w wywołaniach IDispatch Excela95 kryje się jeszcze pewien
kruczek ;) Ale to tak zupełnie na marginesie.

Morris
-- 
Archiwum grupy: http://niusy.onet.pl/pl.comp.lang.delphi
Re: Jeszcze raz WebBrowser (czytajcie tylko początek)
#126604
Author: RaNo
Date: Wed, 10 Oct 2001 16:55
26 lines
1813 bytes
> Wystarczy? Czy mam tłumaczyć co i jak? :))

Wystarczy! SUPER!
Wreszcie ktoś wykazał się znajomością tego badziewia,
za co przynajmniej ja jestem ogromnie wdzięczny!
Nareszcie jakaś treściwa odpowiedź!

> PS.
>   W temacie Excela 95 - powyższe to hint, jak do niego podejść :)
> Właśnie przez "ręczną" zabawę z IDispatch, bo inaczej nie idzie...
> Z tym, że w wywołaniach IDispatch Excela95 kryje się jeszcze pewien
> kruczek ;) Ale to tak zupełnie na marginesie.

Ale powyższego już nie kapuję! O co chodzi?

> Params.cArgs:=0;       file://Stop to bezparametrowa procedura
> Params.cNamedArgs:=0;

I jeszcze to: Jeśli chcę użyć jakiejś metody z paramterami
(powiedzmy Navigate, która ma ich aż 5), to co muszę zrobić
z cArgs? Co to jest cNamedArgs i jak to się ma do cArgs?


--
RaNo
www.RaNo.cad.pl
Jeszcze raz WebBrowser (czytajcie tylko początek)
#126606
Author: addicted2niche
Date: Thu, 21 Dec 2017 19:05
1 lines
1801 bytes
Hello every women and girl who is. Chat with Raz Morris he is my husband and he did not have money to look after u. All my money. Is mine. He naver work. And hit me. Cos I. See him. Chat. In mail.  So if u need him no need. To writing stupid. Code. Just tell me. I will bring.  He stuff to u.
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads