Einzelnen Beitrag anzeigen

Benutzerbild von haentschman
haentschman
Online

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.428 Beiträge
 
Delphi 12 Athens
 
#2

AW: Projekt hat exception-klasse external:sigsev ausgelöst

  Alt 2. Feb 2025, 15:17
Willkommen hier...

Zum Thema kann ich nur raten weil ich die FPC Komponente nicht kenne...

Aber:
Delphi-Quellcode:
portNames := getSerialPortNames;
port := '';
for i := 1 to Length(portNames) do
begin
  if portNames[i] = ',then
  begin
    ComboBoxPorts.Items.Add(port); // hier sitzt das Problem
    port := '';
  end
Du weist in der Schleife der port Variable vor dem .Add keinen Wert aus der Liste portNames zu. port ist immer ''. Das sollte den Fehler eigentlich nicht auslösen, es sei denn die ComboBox ist nicht initialisiert. (Hörensagen aus Google mit SIGSEV...) .Items.Add() kann mit '' umgehen.
Wie sieht denn der Inhalt von portNames aus?
PS: wo ist getSerialPortNames deklariert und implementiert?

PS: Bitte setze den Quellcode in die Delphi Tags. Der Knopf mit dem Delphi Helm im Editor.

Geändert von haentschman ( 2. Feb 2025 um 15:26 Uhr)
  Mit Zitat antworten Zitat