Checkboxen mit gleichem Boolean-Wert zählen

[gmc616]

Ähm ... ich weiß, es ist Freitag Abend, aber was hat das Printer.Canvas da im Source zu suchen?
Drucken? Dann solltest du evtl. auch ein Printer-Dokument starten, oder nicht?

Delphi-Quellcode:

if not (f2) then 
begin
  printer.BeginDoc;
  printer.Canvas.Font.Size := 12;
  for c2 := 0 to memo1.lines.count -1 do 
  Begin
    printer.canvas.textout( 0, c2 * printer.Canvas.TextHeight( Memo1.Lines[c2] ) , Memo1.Lines[c2]);
  End;
  printer.EndDoc;
end;

Zitat von Tumm:

... inerhalb der Fehöer-Prozedur macht er plötzlich einen Sprung im Source ...

Ahja, welche Fehlerprocdure?
Wo springt er ab und springt er hin?

nicht etwa evtl. hier?if Assigned(compo) then wenn ja, das kriegst du selbst raus

P.S. Formatiere deinen Source mal vernüftig. Was soll denn da durchsehen !?