السلام عليكم
أريد أن أسأل حول تغيير حجم الفورم مع وضع الخاصية borderStyle تساوي قيمة bsnone.
بحيث أتمكن من تكبيره و تصغيره
و السلام عليكم و رحمة الله و بركاته
سؤال في عمل Resize للفورم bsnone
مغلق
صباح الخير :)
بعد أن تضع الخاصية bsnone:
ضع ضمن الـ Public للفورم:
procedure CreateParams(var Params: TCreateParams); override;
وبعد الـ implementation:
procedure TForm1.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.Style := (Params.Style or WS_THICKFRAME); end;
وبالتوفيق إن شاء الله يا asrocks ;)
قال تعالى: ((وَمَا أَصَابََكُمْ مِنْ مُصِيبَةٍ فَبمَا كَسَبَتْ أَيْدِيكُمْ وَ يَعْفُو عَنْ كَثِيرٍ)) :.:.: الشورى: الآية 30.
IN ALLAH WE TRUST
:.:.:.:.:.:.:.:.:.:.:.:.:.:
الله يعطيك العافية أخوي Like Delphi
هذا الموضوع مغلق.