[simpits-tech] Falcon4 Data

[Stig Joergensen]

Erwin,

I agree with your "feeling"... but atleast it can be done in the current
state and dont require DXxxxx

and from a coding point of view, i might not be that hard.....

<delphi language on>
    TMetaData = record
       cmd : integer;
       color : TColor;
       case integer of 
         // Line Data
         1 : StartX : integer;   
             StartY : Integer;
             EndX : Integer;
             EndY : integer;
         // Bitmap data
         2 : StartX : integer;
             StartY : integer;
             Width : Integer;
             Height : integer;
             Raster : Pointer;
       end;


    RenderThis(surface, mycallback)


and render this is now declared as
  TRenderProc = procedure(surface : TSurface; Data : TMetaData)
  RenderThis(surface : TSurface; RenderProc : TRenderProc)

and in the RenderThis every time a drawing routine is called just do
this... (im using "line" as an example)
  if assigned(RenderProc) then
  begin
     Data.cmd := 1;
     Data.Color := DXColor;
     Data.StartX := xpos;
     Data.StartY := ypos;
     Data.EndX := xpos;
     Data.EndY := ypos;
     RenderProc(surface,Data)
  end;


and then in the call back routine, you could just write the data to a
named pipe with simple io calls....

</delphi>


But i might just be dreaming......

/Stig



> -----Original Message-----
> From: Erwin Neyt [mailto:rwntn@hvv.nl]
> Sent: 13. februar 2003 12:24
> To: 'simpits-tech@simpits.org'
> Subject: RE: [simpits-tech] Falcon4 Data
> 
> 
> Stig,
> 
> It's just a feeling, but I expect that to be a lot of data. 
> Sending that at
> a acceptable frame rate would be quite intense, I guess.