실수:수; ㅎ창:창;
진리:창존재; 수:=0; 반복 { 창존재:=창생성여부("메모장"+수를문(수)); 수:=수+1; }까지(창존재=거짓); 수:=수-1; 창 := 생성해(ㅎ창,"", "메모장"+수를문(수)); //창.창양식 := ㅊㅇ창틀무; 창.위치크기바꿔(200, 200, 150, 170);
//---------------------- 여기까지는 무한생성 잘되네요..
ㅎ객체: 창이동; 창이동 := 창;
//------------------- 이거 안먹혀용 외일까요? 뭐를 잘못했을까요? //사건연결해(창이동, "마우스버튼을 누를때", "눌림:=참;마우스:=X;마우스1:=Y;"); //사건연결해(창이동, "마우스버튼을 뗄때", "눌림:=거짓;"); //사건연결해(창이동, "마우스를 움직일때", "만일(눌림=참){ 메모장"+수를문(수)+".위치크기바꿔(마우스좌표X-마우스,마우스좌표Y-마우스1,메모장"+수를문(수)+".폭,메모장"+수를문(수)+".높이);}");
창.보여;
///////////////////////소스 포함합니다..
|