Что нового

Wwwarab Nar 3gp Sex Algerie Telechargement Gratuitcom Hot ⏰ 🚀

Wwwarab Nar 3gp Sex Algerie Telechargement Gratuitcom Hot ⏰ 🚀

: While there is a growing openness and a shift toward women seeking freedom of emotional expression, relationships often remain bound by religious and social conventions. Openly recognized romantic relationships are more common today, yet they are still frequently viewed through the lens of honor and family reputation.

In contemporary Algeria, relationships are increasingly shaped by a "media tsunami" that introduces globalized concepts of romance while existing alongside traditional Islamic frameworks. wwwarab nar 3gp sex algerie telechargement gratuitcom hot

: Explores the intersection of identity and romantic ideals through the eyes of an Algerian immigrant in Paris. : While there is a growing openness and

: Uses a satirical approach to examine marriage markets and social expectations in a small Berber village. : Explores the intersection of identity and romantic

The Narrative of Love: Relationships and Romantic Storylines in Algerian Culture

: Social media has become a vital space for younger generations to build relationships beyond their immediate local environment. This digitalization has created new avenues for "digital storytelling," where personal love stories are shared and shaped by a globalized culture.

Автор
T

Tuxzer92

Новичок
Сообщения
65
Репутация
0
Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

Local $nCh1, $nCh2, $nCh3, $nCh4, $nCh5, $nCh6, $msg, $text, $FileSize
$TotalSize=0
$DownloadSize=3
$Free="9"
GUICreate("My GUI Checkbox") ; Создаёт окно в центре экрана
$Label=GUICtrlCreateLabel($text,10,50,100,50)
$Label2=GUICtrlCreateLabel($Free,50,50,100,50)
$nCh1 = GUICtrlCreateCheckbox("Checkbox 1", 10, 10, 120, 20)
$nCh2 = GUICtrlCreateCheckbox("Checkbox 2", 10, 90, 120, 20)
$nCh3 = GUICtrlCreateCheckbox("Checkbox 3", 10, 150, 120, 20)
GUISetState() ; показывает созданное окно

; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
   Switch $msg
	  Case $nCh1
		 Check($msg)
	  Case $nCh2
		 Check($msg)
	  Case $nCh3
		 Check($msg)
   EndSwitch
WEnd

Func Check($msg)
   If GUICtrlRead($msg) = $GUI_CHECKED Then
	  $TotalSize+=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
	  If $TotalSize >= $Free Then
		 MsgBox(16,"","ERROR")
	  EndIf
   EndIf
   If GUICtrlRead($msg) = $GUI_UNCHECKED Then
	   $TotalSize-=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
   EndIf
EndFunc

Решил так.
 
Верх