창0.배경.펜.색상 := ㅅ파랑;
창0.배경.펜.폭 := 1;
실수:수;
반복
{
창0.배경.펜.색상 := ㅅ파랑;
창0.배경.펜이동(210, 10+수);창0.배경.선그려(210-수, 210);
창0.배경.펜.색상 := ㅅ노랑;
창0.배경.펜이동(210, 410-수);창0.배경.선그려(210-수, 210);
창0.배경.펜.색상 := ㅅ빨강;
창0.배경.펜이동(210, 210+수);창0.배경.선그려(410-수, 210);
창0.배경.펜.색상 := ㅅ하양;
창0.배경.펜이동(210, 10+수);창0.배경.선그려(210+수, 210);
수:=수+5;
} 까지( 수 > 200);
히히 이거 창하나 생성하고 클릭했을때... 이밴트에 삽입하고 실행해보세요...
창은 450*450크기로 설정하시고..^^
아마 아시는 분도 있을듯..^^ |
|