Bei Setup mit InnoSetup festellen ob Datenbank lokal

Thema durchsuchen

Ansicht

Themen-Optionen

Bei Setup mit InnoSetup festellen ob Datenbank lokal

Ein Thema von norwegen60 · begonnen am 21. Jan 2016 · letzter Beitrag vom 21. Jan 2016

Vorheriger Beitrag

Nächster Beitrag

norwegen60

Registriert seit: 23. Dez 2007
Ort: Schwarzwald
511 Beiträge

Delphi 12 Athens

AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal

21. Jan 2016, 21:30

Ich glaube ich habe eine einfachere Möglichkeit gefunden.

markieren

Delphi-Quellcode:

			sPcName = lowercase(GetComputerNameString);  

if (pos(sPcName, lowercase(sServerName)) > 0) or      // PC-Name Teil des Servernamens

   (pos('local', lowercase(sServerName)) > 0) or      // LOCAL Teil des Servernamens, z.B. LOCALHOST

   (pos('127.0.0.1', sServerName) > 0) then               // 127.0.0.1 des Servernamens

      MsgBox('Angegebener Server ist lokaler Server', mb_Infomation, MB_OK);

Oder spricht da was dagegen?