|
소스자료실 - 창조 소스를 공유하는 곳입니다. 첨부가능 확장자는 *.zip,*.rar,*.arj,*.exe,*.jpg,*.png,*.gif,*.cuf,*.nhp,*.nhw 입니다. |
| Posted by 성인e | 2008-06-09 13:48:06, Hit : 6255 | |
|
|
|
안돼는 이유가 뭔지;; 소스 올릴게요.
중요 코드는 아래것인데;
// 실수:그림높이,이런; 만일(부정 내그림.그림.그림존재) { 나가;} 메모0.내용.추가("<table width="+수문(34)+수를문(내그림.그림.폭)+수문(34)+" border="+수문(34)+"0"+수문(34)+" cellpadding="+수문(34)+"0"+수문(34)+" cellspacing="+수문(34)+"0"+수문(34)+"><tr>"); 눈금계0.최대:=내그림.그림.높이; // 실수:색깔,그림폭; 실수:빨,초,파; 반복 { 이런:=내그림.그림.폭; 눈금계0.눈금위치:=그림높이; 사건메모.내용.지워; 반복 { 만일(이런<10000) { 만일(이런<1000) { 만일(이런<100) { 만일(이런<10) { 반복 { 색깔 := 내그림.그림.배경.점제어(그림폭,그림높이,-1); 선택색.색상 := 색깔; 빨 := bAND(색깔,255); 초 := bAND(shr(색깔,8),255); 파 := bAND(shr(색깔,16),255); 빨강값.문자 := 수를문(빨); 초록값.문자 := 수를문(초); 파랑값.문자 := 수를문(파); 에디트0.문자:=사용자함수0.십을십육(빨)+사용자함수0.십을십육(초)+사용자함수0.십을십육(파); 메모0.내용.추가("<td bgcolor="+수문(34)+"#"+에디트0.문자+수문(34)+"width="+수문(34)+"1"+수문(34)+" height="+수문(34)+"1"+수문(34)+"></td>"); 그림폭:=그림폭+1; 이런:=이런-1; 같이실행해; }까지(이런<1); } 아니면 { //사건연결해(제길,"클릭했을때",분할10.내용.전체문자); 반복 { 사건메모.내용.추가(분할10.내용.전체문자); 이런:=이런-10; }까지(이런<10); } } 아니면 { //사건연결해(제길,"클릭했을때",분할100.내용.전체문자); 반복 { 사건메모.내용.추가(분할100.내용.전체문자); 이런:=이런-100; }까지(이런<100); } } 아니면 { //사건연결해(제길,"클릭했을때",분할1000.내용.전체문자); 반복 { 사건메모.내용.추가(분할1000.내용.전체문자); 이런:=이런-1000; }까지(이런<1000); } } 아니면 { //사건연결해(제길,"클릭했을때",분할10000.내용.전체문자); 반복 { 사건메모.내용.추가(분할10000.내용.전체문자); 이런:=이런-10000; }까지(이런<10000); } }까지(이런<1); 사건연결해(제길,"클릭했을때",사건메모.내용.전체문자); 제길.눌러; // // 메모0.내용.추가("</tr>"+수문(13)+수문(10)+" <tr>"); 그림높이:=그림높이+1; 같이실행해; }까지(내그림.그림.높이<그림높이); 메모0.내용.추가("</tr>"+수문(13)+수문(10)+"</table>"); 메모0.내용.파일저장해(경로+"test.html"); 문자창보여("ㅇㅅㅇ");
|
|
|
지우개 Expert 3.0 제작자 : 천호성 님 [LINK] |
|
|
|
대박로또2005 제작자 : 최재일 님 [LINK] |
|
|
1 | 박종훈 님 | 15292 점 | |
2 | 지상현 님 | 8809 점 | |
3 | 손상진 님 | 7388 점 | |
4 | 권선중 님 | 6060 점 | |
5 | 이진백 님 | 5174 점 | |
|
|
|
가입일 | 닉네임 |
05/31 | 김동률 |
03/31 | 홍형기 |
09/01 | o00pp99oo |
12/27 | 이재민 |
11/20 | 이희철 |
|
|
|
|
. |
. |
. |
|