Rev 3363 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3458 | leency | 1 | |
2 | enum { _WIN, _DOS, _KOI, _UTF }; |
||
3 | |||
4 | |||
3067 | leency | 5 | #define ID2 177 |
6 | |||
7 | |||
8 | |||
9 | |||
10 | char temp1[sizeof(URL)]; |
||
11 | strcpy(#temp1, #URL); |
||
12 | temp1[len] = 0x00; |
||
13 | return #temp1; |
||
14 | } |
||
15 | |||
16 | |||
17 | |||
18 | |||
19 | |||
20 | { |
||
21 | int i, j = 0; |
||
22 | for (i = 0; i <= id - 401; i++) |
||
23 | { |
||
24 | do |
||
25 | { |
||
26 | j++; |
||
27 | if (j>=strlen(#page_links)) return; |
||
3458 | leency | 28 | } |
3067 | leency | 29 | while (page_links[j] <>'|'); |
30 | } |
||
31 | page_links[j] = 0x00; |
||
32 | strcpy(#URL, #page_links+strrchr(#page_links, '|')); |
||
33 | } |
||
34 | |||
35 | |||
36 | |||
37 | //палочек для мороженого и жевательной резинки: |
||
38 | //Снимаем область экрана и выводим её обратно полосками со смещением, |
||
39 | //что даёт перекос картинки |
||
40 | //При наличии фона и т.п. проявится вся костыльность решения :) |
||
41 | |||
42 | |||
43 | { |
||
44 | dword italic_buf; |
||
45 | int tile_height=2, |
||
3458 | leency | 46 | shift=-2, |
47 | i, skin_height; |
||
3067 | leency | 48 | |
49 | |||
50 | skin_height = GetSkinHeight(); |
||
51 | CopyScreen(italic_buf, x+Form.left+2, y+Form.top+skin_height, w, h); |
||
52 | |||
53 | |||
54 | _PutImage(x+shift-i+1,i*tile_height+y, w,tile_height, w*3*tile_height*i+italic_buf); |
||
3363 | leency | 55 | |
3067 | leency | 56 | |
57 | } |
||
58 | >>=> |