Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Inno Setup - Pascal-Problem: Prüfe, ob 32 bzw. 64bit und schreibe nach der Installation in die Registry

Frage Entwicklung Pascal und Delphi

Mitglied: kaheiho

kaheiho (Level 1) - Jetzt verbinden

01.08.2014 um 17:45 Uhr, 1978 Aufrufe, 1 Kommentar

Hallo liebe Leute,
leider bin ich -trotz einiger Recherchen in Netz - am Ende meiner (nicht vorhandenen Pascal-Kenntnisse) angelangt:
in der folgenden Prozedur bekomme ich beim Kompilieren immer den Fehler "Type mismatch" - was mache ich falsch?

Code Start----------------------
Schreibt NACH INSTALLATION in die Registry, um die Meldung
"Silverfast ist auf diesem System nicht installiert"
zu unterdrücken.
Wenn 32bit-System:
Schlüssel: HKEY_LOCAL_MACHINE\SOFTWARE\Film Scanner\A28\USB\ScanCenter
Name : DETECT_SILVERFAST
Wert : 0 statt 1

Wenn 64bit-System:
Schlüssel: HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Film Scanner\A28\USB\ScanCenter
Name : DETECT_SILVERFAST
Wert : 0 statt 1
procedure CurStepChanged(CurStep: TSetupStep);
begin
if CurStep=ssPostInstall then begin
if (IsWin64) then
begin
RegWriteStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Wow6432Node\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
RegWriteStringValue(HKEY_CURRENT_USER, 'Software\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
RegWriteStringValue(HKEY_USERS, 'S-1-5-19\Software\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
end
else
begin
RegWriteStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
RegWriteStringValue(HKEY_CURRENT_USER, 'Software\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
RegWriteStringValue(HKEY_USERS, 'S-1-5-19\Software\Film Scanner\A28\USB\ScanCenter', 'DETECT_SILVERFAST', 0)
end
end
end;
Code Ende---------------------

Hoffe jemand weiß weiter und kann mir helfen.

Vielen Dank im Voraus
kaheiho
Mitglied: kaheiho
01.08.2014 um 18:18 Uhr
Bitte um Entschuldigung, hab' den Wald vor lauter Bäumen nicht gesehen:
es muß natürlich heißen "RegWriteDWordValue" statt "RegWriteStringValue" !!!
Bitte warten ..
Ähnliche Inhalte
Windows Update
gelöst Windows Server 2012 R2 - WSUS Problem (1)

Frage von aladin.inder zum Thema Windows Update ...

Batch & Shell
PowerShell Transkript Problem (5)

Frage von Marabunta zum Thema Batch & Shell ...

Ubuntu
Problem mit MailServer unter Debian - Postfix, Dovecot (4)

Frage von Richard8 zum Thema Ubuntu ...

Router & Routing
gelöst Mikrotik Switching und Routing Problem (11)

Frage von aqui zum Thema Router & Routing ...

Heiß diskutierte Inhalte
Windows 7
gelöst BOOTMGR is missing (auch nach bootrec -RebuildBcd) (21)

Frage von Mipronimo zum Thema Windows 7 ...

Router & Routing
Tipps für Router (ca. 100 clients, VPN) (20)

Frage von oel-auge zum Thema Router & Routing ...

Windows Userverwaltung
Windows Freigabe: Zugriff auf alle Ordner trotz Sicherheitseinstellungen (18)

Frage von Pandreas zum Thema Windows Userverwaltung ...

Exchange Server
gelöst MS Exchange 2016 - Basicconfig Fragen (16)

Frage von maddig zum Thema Exchange Server ...