Danke CCRDude,
hab das Problem gefunden...hat mit dem bugfix zu tun (1 bug weg ein neuer drin
).
bei der Ausgabe wird die eigenschaft in der TCollection als String behandelt und ' an die Eigenschaft angehängt
geänderte EncodeSpecialChars-Funktion (dfmparse_u.pas:306)
Delphi-Quellcode:
function EncodeSpecialChars(ins:string):string;
var s,value:string;
i,c,lc:integer;
begin
lc:=0;
value:=ins;
if isLastChar(PChar(value),'''') then
begin
for i:=2 to length(value)-1 do
begin
c:=ord(value[i]);
if not ((c<32) or (c>126) or (c=39)) then c:=-1;
if (c>-1) {and (i>p) }and (i<length(value)) then
begin
//sonderzeichen zwischen den Stringbegrenzern
s:=s+'''#'+IntToStr(c)+'''';
end else s:=s+value[i];
if ((length(s)-lc)>64) and (i<length(value)-1) then
begin
s:=s+''' +'+#13#10;
lc:=length(s);
s:=s+{StringOfChar(' ',indent*2+2)+}'''';
end;
end;
{if length(s)>2 then
while pos('''''',s)>0 do delete(s,pos('''''',s),2); }
result:=''''+s+'''';
end else result:=ins;
end;
ich schau mal, ob ich wegen den Dialogen etwas machen kann...
//Edit
für diejenigen, die ein Hauptmenü einer Toolbar vorziehen (oder auch beides haben wollen), hab ich jetzt ein solches TMainMenu eingebaut
//nochmal edit:
hab jetzt tab und shift+Tab im
OI eingebaut, den Menü-Editor um die defualt-eigenschaft ergänzt und die Hilfe bisschen aktualisiert
ich hoffe, es finden sich noch paar tester...
Gruß Frank