Hi, Am I missing something or doesn't the compiler supprt default parameters like: procedure Draw( Canvas: TCanvas; X, Y, Index: Integer; Enabled: --> Boolean = True <-- ); Marc