14
में पूर्ण TStringGrid सेल को पेंट नहीं करता है डेल्फी XE2 में पूर्ण TStringGrid सेल पेंट नहीं करता है। डिफ़ॉल्ट रंग में बाईं ओर 3 पिक्सल का अंतर होता है (BiDiModebdLeftToRight पर सेट किया गया है)। यह समस्या डेल्फी 6 में मौजूद नहीं है जिसका मैंने पहले उपयोग किया था।FillRect डेल्फी XE2
procedure TShapeline.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
Stringgrid1.Canvas.Brush.Color:=$00FF80FF;
StringGrid1.Canvas.FillRect(Rect);
end;
मैं (सहित) सभी गुण और अलग ब्रश शैलियों बदलने की कोशिश की, पेंट आयत पूरा सेल को नहीं भरता है। TStringGrid में
यदि ओपी ग्रिडलाइन चाहता है तो क्या होगा? –
फिर मेरा जवाब शायद मदद नहीं करेगा, लेकिन निश्चित लाइनों को बंद करने में मदद मिलती है। –
@ ब्रूस, आपका फिक्स XE के लिए सही है लेकिन XE2 नहीं है। TStringGrid.DrawCell में शाब्दिक रूप से कोड है जो ARect.Left: = ARect.Left + 4 करता है यदि डिफ़ॉल्ट ड्रॉइंग सत्य है और स्टाइल सर्विसेज सक्षम हैं। –