Fehlermeldung "Zu wenig Arbeitsspeicher"

[p80286]

Hallo Micha,
ich vermute das ist nicht so gewollt:

Zitat:

begin
beg:=pos('/*',Temp);
en:=pos('*/',Temp);
if en=0 then en:=Length(Temp);

Dies würde bedeuten, wenn '*/' ,aus welchen Gründen auch immer, fehlt dann wird gnadenlos bis zum Ende gelöscht!

und ob es hiermit keinen Ärger gibt weiß ich auch nicht:

Zitat:

enStr:= copy(Temp,en+2,Length(Temp));

Ich weiß nicht ob in Deinen Daten solche Konstrukte möglich sind:

Delphi-Quellcode:

Select Daten
/* ab hier jetzt auswählen
-- ,daten1
-- ,daten2
-- ,daten3
-- Bitte das Datumsformat beachten !! */
from .......

es gibt Clients, die so etwas verdauen können. In diesem Fall handelst Du Dir durch das löschen der Zeilenkommentare '--' eine Menge Ärger ein, weil dann nur noch "Select Daten" übrig bleibt.

Gruß
K-H