18. Januar 2010 16:20
ISCLEAR(DETAILAUTOMATION)
Create(AUTOMATION);
...
DETAILAUTOMATION := AUTOMATION.Details; // Hier kann der Rückgabe Wert NULL vorkommen
if not ISCLEAR(DETAILAUTOMATION) then
Text := DETAILAUTOMATION.AsString; // Werden Details gefunden ist alles wunderbar; Fehler aber bei Rückgabe NULL
...
18. Januar 2010 17:29
Create(AUTOMATION);
...
DETAILAUTOMATION := AUTOMATION.Details; // Hier kann der Rückgabe Wert NULL vorkommen
if not ISCLEAR(DETAILAUTOMATION) then
Text := DETAILAUTOMATION.AsString // Werden Details gefunden ist alles wunderbar; Fehler aber bei Rückgabe NULL
ELSE
CREATE(DETAILAUTOMATION);
...
19. Januar 2010 10:59
CREATE(AUTOMATION);
...
IF NOT AUTOMATION.GetDetails(DETAILAUTOMATION) THEN
ERROR('Fehler!');
...
19. Januar 2010 11:14
ISCLEAR(DETAILAUTOMATION)