folgende funktion
Delphi-Quellcode:
uses
Classes, ComCtrls, SysUtils;
function fkt_CalcDivTime(s: string): double;
var
Mytime :TDAtetime;
stunden,
minuten,
szEnde,
szStart:String;
begin
mytime:=now; //<- hier versuche ich Mytime zu seten
sZende:=fkt_makecloseString(s); // hier wird aus einem längeren string einteil ausgewählt
sZende:=stringreplace(szende,':','',[rfreplaceall]);
stunden:=copy(szende ,1,2);
minuten:=copy(szende ,3,2);
mytime:=EncodeTime((strtoint(stunden)),(strtoint(minuten)),0,0);
result:= 'ist egal'
end;
ich versuche hier mytime zu ermitteln, um damit weiterzuarbeiten, diese funktion ist bestandteil einer .pas, welche oben aufgeführte dateien hat.
wenn ich nun zu dieser funktion springe, liegt mytime, auch nach
now irgendwo im computer und zeigt astronomische werte an.
mache ich die selbe sache auf einer
unit, der eine form zugewiesen ist, klappt es.
alle deklarationen sind in den oben aufgeführen dateien enthalten. wo liegt mein fehler
raik