Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: Pipe in 64Bit Dll

    FreePascal
    by Gruber_Hans_12345, 9. Jan 2019
  ah glaub hab den fehler gefunden ....
  habe vergessen (weiss nicht genau was davon das wichtige ist) beim Text den ich sende einen #13#10#0 anzuhängen ....
  
  funktioniert nun :D
• Forum: Win32/Win64 API (native code)

  AW: Pipe in 64Bit Dll

    FreePascal
    by Gruber_Hans_12345, 9. Jan 2019
  Also am Server (der ist 32 Bit) erzeuge ich die Pipe mit
  const
  OpenMode = PIPE_ACCESS_DUPLEX or FILE_FLAG_OVERLAPPED;
  PipeMode = PIPE_TYPE_MESSAGE or PIPE_READMODE_MESSAGE or PIPE_WAIT;
  Instances = PIPE_UNLIMITED_INSTANCES;
  var
  fSA : TSecurityAttributes;
  begin
  InitializeSecurity(fSA);
  fPipe := CreateNamedPipe(PChar('\\.\pipe\'+fPipeName),...
• Forum: Win32/Win64 API (native code)

  AW: Pipe in 64Bit Dll

    FreePascal
    by Gruber_Hans_12345, 8. Jan 2019
  ja die laufen auf der selben maschine.
• Forum: Win32/Win64 API (native code)

  AW: Pipe in 64Bit Dll

    FreePascal
    by Gruber_Hans_12345, 8. Jan 2019
  Ja das Problem ist hier nun das
  das CreateFile liefert einen gültigen Handle, und am Server bekomme ich auch mit das sich wer connected
  das SetNamedPipeHandleState und das WriteFile liefern zwar beide 1 zurück, also sagen eigentlich das es funktioniert hat, aber am Server kommt nichts an.
  
  Es handelt sich hier um eine 64Bit Dll, die mit einem 32Bit Server kommuniziert, aber das sollte ja...
• Forum: Win32/Win64 API (native code)

  Pipe in 64Bit Dll

    FreePascal
    by Gruber_Hans_12345, 7. Jan 2019
  Hallo ich verwende Lazarus um eine 64Bit DLL zu schreiben die eine Verbindung zu einer NamedPipe macht, Daten schreibt und liest, allerdings will das ganze nicht so recht.
  
  Der vereinfachte Code :
  
  pipeName := '\\.\pipe\Client'#0;
  sendData := 'Test'#13#10#0;
  timeOut := GetTickCount+5000;
  hPipe := CreateFile(PChar(pipeName), GENERIC_READ or GENERIC_WRITE, 0, nil,...