Скачать: CL | DM;

помогите перевести си - шный код под делфи   Найти похожие ветки 

← →
ol   (2004-06-08 12:34) [0]

#define SERVER_NAME  "clndbb"
#define DBBSZ  2000                                          //!!!

LPVOID  MVOF;                                                //!!!
char   *DBC;                                                 //!!!
float   DBB[DBBSZ];                                          //!!!

//----------------------------------------------------------------------------
int main(vd){
   int  a, b;

   HANDLE  hFMap = OpenFileMapping(                         //!!!
   FILE_MAP_WRITE | FILE_MAP_READ, FALSE, "DBBARR");        //!!!
   MVOF=MapViewOfFile(hFMap, FILE_MAP_ALL_ACCESS,0,0,0);    //!!!
   DBC = (char *) MVOF;                                     //!!!

   for(;;){
       for(a=0; a<DBBSZ; a++){                              //!!!
           b=a*4;                                           //!!!
           memcpy(&DBB[a],&DBC[b],4);                       //!!!

           if(a>0&&a<10){
              printf("DBB[%04d]=%4.0f  ",a,DBB[a]);
           }
       }                                                    //!!!
       printf("\n-------------------------------------------------------\n");
       if(kbhit()>0){ getch(); break; }
   }
                                                           
   CloseHandle(hFMap);                                      //!!!

   return(0);
}
//----------------------------------------------------------------------------
данная процедура читает данные из памяти, сгенерированые туда другой прогой

---

← →
Skier ©   (2004-06-08 12:42) [1]

1)LPVOID  MVOF;   - MVOF : Pointer;
2)char   *DBC;   DBC : PChar;

3)HANDLE  hFMap = OpenFileMapping(                         //!!!
  FILE_MAP_WRITE | FILE_MAP_READ, FALSE, "DBBARR");        //!!!
  MVOF=MapViewOfFile(hFMap, FILE_MAP_ALL_ACCESS,0,0,0);    //!!!

| = or

4) for(;;) = while True do begin end;
 

5)

for a := 0 to DBBSZ - 1 do begin
//.......
end; //for

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.02 c