saber si estoy en red o local, o saber ip

[Neftali [Germán.Estévez]]

Supongo de cuando hablas de red, se trata deque estás ejecutando el EXE directamente sobre la máquina de red.
Creo que si obtienes el path del ejecutable, de ahí sacas la unidad y miras de qué tipo es, te puede servir.

Código Delphi [-]
var
  Unidad: string;
begin
  // Extraer la unidad del ejecutable
  Unidad := ExtractFileDrive(Application.ExeName);

  // Tipo de Disco?
  if (GetDriveType(PChar(Unidad)) = DRIVE_REMOVABLE) or
     (GetDriveType(PChar(Unidad)) = DRIVE_FIXED) then begin
    MessageDlg('LOCAL', mtInformation, [mbOK], 0);
  end
  else begin
    MessageDlg('No LOCAL', mtInformation, [mbOK], 0);
  end;