Laptop oder Desktop Computer ermitteln??

[himitsu]

Das WMI ist bestimmt 'nen guter Vorschlag.

Wenn du mich dann gefunden hast, dann könnte ich dir z.B. dieses vorschlagen:
> z.B. WMI (Windows Management Instrumentation) + Demo

Delphi-Quellcode:

Uses ..., WMI;

Var WMIResults: TWMIInfo;
  ChassisTypes: Integer;

If WMIGetInfo('.', 'root\CIMV2', '', '',
  'Select ChassisTypes from Win32_SystemEnclosure', WMIResults) Then
  ChassisTypes := StrToInt(WMIRead(WMIResults, 0, 'ChassisTypes'));