SRL Archive - OSR Help

OutSide Main Thread


sm0k3

2011-04-22 02:15:02

Can anyone help me .. i keep getting the error

CheckSychronize call from non-main thread "$1624" < this number changes

program Hiker;
{$DEFINE SMART}
{.include SRL/SRL.scar}
{.include Reflection/Reflection.simba}
{.include WebWalk.simba}


var //Script Vars
TargetLoc: string; // Target Location
TargetLocID: integer;
LocCount: integer;
Locations: TStringList;
locn : LongInt;
WorldM: TGraph;
var // Form Vars
LocForm: TForm;
List: TListBox;
Ok: TButton;

Function DoWalk(TLocID: integer): Boolean;
begin
Try
WebWalk(TLocID, WorldM);
Except
Writeln('Coulnt Walk to location');
End
end;


procedure Go(Sender: TObject);

begin
case sender of
Ok:Begin TargetLoc := ToStr(List.Items[List.ItemIndex]); //Changes, the text of the TEdit to the text of the selected item in the TListbox
Writeln(TargetLoc);
locn := List.ITEMINDEX;
TargetLocID := StrToInt(Locations.Strings[locn])
DoWalk(TargetLocID);
end;
end;
end;

Function LoadNodes(WorldN: string): Boolean;
var
i: integer;
ii , Cvar, Nvar: string;
Begin
LocCOUNT := StrToInt(ReadINI('NODE','COUNT',ScriptPath+'\Worlds\'+WorldN));
Writeln('I Currently know '+ToStr(LocCOUNT)+' Locations');
for i := 0 to LocCOUNT do
begin
ii := ToStr(i);
try
Cvar := ReadINI(ii, 'NAME',ScriptPath+'\Worlds\'+WorldN);
List.Items.Append(Cvar);
Nvar := ReadINI(ii, 'NODE',ScriptPath+'\Worlds\'+WorldN);
Locations.Add(Nvar);
except
WriteLn('Failed to Read World Data!');
end
result := true;
end;
end;
procedure SetupLocForm;
Begin
// Begin Location ListBox
List := TListBox.Create(LocForm);
List.Parent := LocForm;
List.SetBounds(24, 48, 209, 233);
List.ONCLICK := @Go;
// End Location ListBox

// Begin Ok Button
Ok := TButton.Create(LocForm); //Every Object must be created before using it.
Ok.Parent := LocForm; //every object must have a parent (except for TForm) usually its the same as the owner
Ok.SetBounds(120,360, 75, 25); //Adds the Width, Height, Left, and Top in one line.
Ok.Caption := 'Ok';
Ok.ONCLICK := @Go;
// End Ok Button
End;


function CLocForm(): Boolean;
var
i, h: Integer;
v : TVariantArray;
begin;
try
Locform := TForm.Create(nil);//creates the form
Locform.Position := poDesktopCenter;
Locform.Width := 300;
Locform.Height := 400;
Locform.Caption := 'Noob Powerfighter';
Locform.Color := clWhite;
Locform.BorderStyle := bsSingle;
SetupLocForm;
except
Writeln('setupForm failed')
Exit;
end;
result := true;
end;


Function StartForm(Form: string): Boolean;
var
v : TVariantArray;
begin;
try
ThreadSafeCall('ClocForm', v);
except
writeln('Failed to load form: '+ Form);
result := false;
Exit;
end;
writeln('Loaded Form Succesfuly: '+ Form);
result := true;
end;
procedure LoadWorldM;
Begin

WorldM.Node := [Point(2368, 3628), Point(2360, 3633), Point(2349, 3640), Point(2342, 3648), Point(2332, 3655), Point(2338, 3663), Point(2328, 3638), Point(2336, 3630), Point(2343, 3625), Point(2345, 3615), Point(2346, 3605), Point(2347, 3591), Point(2345, 3580), Point(2344, 3570), Point(2345, 3558), Point(2345, 3546), Point(2352, 3603), Point(2358, 3613), Point(2363, 3624), Point(2337, 3588), Point(2350, 3533), Point(2355, 3520), Point(2360, 3511), Point(2362, 3501), Point(2362, 3489), Point(2363, 3478), Point(2364, 3469), Point(2365, 3456), Point(2367, 3444), Point(2364, 3429), Point(2365, 3419), Point(2368, 3404), Point(2373, 3392), Point(2385, 3391), Point(2399, 3389), Point(2411, 3386), Point(2420, 3385), Point(2436, 3385), Point(2448, 3383), Point(2458, 3381), Point(2468, 3386), Point(2483, 3388), Point(2494, 3387), Point(2503, 3386), Point(2517, 3390), Point(2527, 3399), Point(2537, 3402), Point(2550, 3397), Point(2560, 3392), Point(2571, 3389), Point(2583, 3385), Point(2594, 3382),
Point(2605, 3383), Point(2613, 3383), Point(2624, 3382), Point(2632, 3375), Point(2641, 3374), Point(2646, 3380), Point(2653, 3383), Point(2662, 3382), Point(2673, 3380), Point(2667, 3375), Point(2683, 3383), Point(2691, 3389), Point(2644, 3384), Point(2642, 3395), Point(2643, 3407), Point(2644, 3418), Point(2644, 3431), Point(2652, 3440), Point(2662, 3449), Point(2669, 3458), Point(2676, 3469), Point(2683, 3478), Point(2693, 3486), Point(2705, 3486), Point(2633, 3363), Point(2634, 3359), Point(2633, 3346), Point(2633, 3339), Point(2624, 3334), Point(2615, 3337), Point(2606, 3332), Point(2605, 3325), Point(2605, 3313), Point(2605, 3303), Point(2606, 3295), Point(2620, 3297), Point(2633, 3298), Point(2642, 3289), Point(2650, 3283), Point(2652, 3296), Point(2658, 3306), Point(2649, 3317), Point(2646, 3328), Point(2602, 3284), Point(2594, 3277), Point(2598, 3267), Point(2596, 3257), Point(2595, 3247), Point(2638, 3333), Point(2537, 3413), Point(2537, 3425), Point(2536, 3437), Point(2537, 3451),
Point(2548, 3460), Point(2550, 3470), Point(2542, 3477), Point(2532, 3478), Point(2530, 3490), Point(2527, 3499), Point(2524, 3508), Point(2523, 3518), Point(2521, 3527), Point(2517, 3540), Point(2520, 3554), Point(2525, 3561), Point(2540, 3564), Point(2540, 3570), Point(2516, 3523), Point(2507, 3522), Point(2499, 3518), Point(2497, 3507), Point(2500, 3496), Point(2503, 3489), Point(2462, 3368), Point(2468, 3361), Point(2479, 3354), Point(2489, 3353), Point(2503, 3353), Point(2512, 3352), Point(2524, 3349), Point(2533, 3347), Point(2547, 3344), Point(2558, 3346), Point(2567, 3345), Point(2581, 3344), Point(2586, 3338), Point(2582, 3330), Point(2579, 3321), Point(2583, 3315), Point(2589, 3306), Point(2591, 3297), Point(2601, 3296), Point(2580, 3357), Point(2579, 3369), Point(2575, 3379), Point(2704, 3392), Point(2716, 3397), Point(2725, 3404), Point(2735, 3411), Point(2744, 3417), Point(2756, 3425), Point(2767, 3431), Point(2779, 3434), Point(2791, 3434), Point(2805, 3436), Point(2808, 3441),
Point(2815, 3438), Point(2822, 3438), Point(2833, 3436), Point(2842, 3433), Point(2851, 3430), Point(2714, 3487), Point(2722, 3487), Point(2724, 3491), Point(2729, 3487), Point(2723, 3475), Point(2719, 3468), Point(2706, 3464), Point(2720, 3462), Point(2720, 3456), Point(2729, 3452), Point(2732, 3444), Point(2743, 3446), Point(2732, 3436), Point(2739, 3427), Point(2676, 3445), Point(2688, 3446), Point(2701, 3444), Point(2713, 3436), Point(2723, 3435), Point(2615, 3332), Point(2735, 3493), Point(2741, 3505), Point(2741, 3519), Point(2740, 3535), Point(2731, 3543), Point(2717, 3546), Point(2707, 3545), Point(2696, 3546), Point(2683, 3550), Point(2672, 3558), Point(2660, 3564), Point(2655, 3576), Point(2651, 3591), Point(2652, 3607), Point(2659, 3615), Point(2659, 3628), Point(2669, 3639), Point(2661, 3651), Point(2658, 3662), Point(2664, 3674), Point(2681, 3637), Point(2692, 3638), Point(2700, 3646), Point(2708, 3656), Point(2711, 3666), Point(2717, 3677), Point(2718, 3690), Point(2712, 3702),
Point(2713, 3712), Point(2722, 3716), Point(2740, 3550), Point(2741, 3482), Point(2753, 3478), Point(2760, 3471), Point(2764, 3463), Point(2773, 3454), Point(2778, 3448), Point(2785, 3442), Point(2802, 3447), Point(2802, 3455), Point(2806, 3465), Point(2791, 3454), Point(2782, 3457), Point(2771, 3459), Point(2855, 3443), Point(2847, 3456), Point(2839, 3468), Point(2847, 3475), Point(2844, 3489), Point(2838, 3496), Point(2839, 3506), Point(2849, 3511), Point(2859, 3507), Point(2861, 3495), Point(2857, 3488), Point(2855, 3480), Point(2856, 3470), Point(2861, 3464), Point(2865, 3455), Point(2864, 3443), Point(2881, 3428), Point(2893, 3434), Point(2898, 3445), Point(2912, 3446), Point(2922, 3455), Point(2935, 3458), Point(2937, 3470), Point(2928, 3480), Point(2920, 3489), Point(2915, 3501), Point(2909, 3510), Point(2904, 3521), Point(2904, 3492), Point(2899, 3482), Point(2895, 3476), Point(2891, 3469), Point(2887, 3460), Point(2873, 3434), Point(2887, 3445), Point(2902, 3534), Point(2881, 3439),
Point(2932, 3450), Point(2590, 3235), Point(2582, 3225), Point(2575, 3219), Point(2566, 3210), Point(2553, 3204), Point(2540, 3199), Point(2533, 3198), Point(2520, 3200), Point(2505, 3198), Point(2494, 3179), Point(2485, 3169), Point(2486, 3163), Point(2484, 3152), Point(2485, 3141), Point(2491, 3129), Point(2499, 3124), Point(2513, 3119), Point(2517, 3112), Point(2523, 3101), Point(2528, 3090), Point(2529, 3076), Point(2535, 3068), Point(2548, 3064), Point(2557, 3064), Point(2569, 3060), Point(2583, 3061), Point(2595, 3058), Point(2602, 3060), Point(2615, 3066), Point(2620, 3069), Point(2622, 3078), Point(2623, 3092), Point(2615, 3102), Point(2622, 3107), Point(2619, 3115), Point(2622, 3123), Point(2621, 3132), Point(2623, 3144), Point(2602, 3236), Point(2607, 3230), Point(2611, 3222), Point(2621, 3214), Point(2625, 3203), Point(2624, 3194), Point(2622, 3181), Point(2619, 3173), Point(2622, 3162), Point(2621, 3152), Point(2606, 3098), Point(2609, 3091), Point(2521, 3071), Point(2505, 3067),
Point(2494, 3067), Point(2481, 3069), Point(2468, 3067), Point(2456, 3070), Point(2455, 3080), Point(2448, 3087), Point(2441, 3084), Point(2564, 3052), Point(2562, 3044), Point(2560, 3033), Point(2559, 3024), Point(2561, 3014), Point(2566, 3008), Point(2568, 2998), Point(2567, 2989), Point(2565, 2976), Point(2561, 2967), Point(2552, 2957), Point(2547, 2946), Point(2543, 2939), Point(2531, 2934), Point(2525, 2926), Point(2514, 2918), Point(2505, 2910), Point(2493, 2901), Point(2482, 2894), Point(2468, 2886), Point(2456, 2878), Point(2446, 2868), Point(2436, 2861), Point(2426, 2853), Point(2414, 2849), Point(2409, 2840), Point(2407, 2833), Point(2401, 2833), Point(2400, 2837), Point(2422, 2846), Point(2433, 2845), Point(2440, 2843), Point(2453, 2837), Point(2460, 2834), Point(2473, 2832), Point(2483, 2831), Point(2495, 2832), Point(2502, 2830), Point(2515, 2833), Point(2527, 2834), Point(2537, 2839), Point(2546, 2839), Point(2554, 2839), Point(2527, 2916), Point(2530, 2909), Point(2530, 2901),
Point(2525, 2890), Point(2520, 2883), Point(2517, 2872), Point(2515, 2867), Point(2512, 2858), Point(2507, 2849), Point(2508, 2838), Point(2942, 3452), Point(2950, 3460), Point(2951, 3467), Point(2954, 3481), Point(2956, 3493), Point(2947, 3441), Point(2949, 3434), Point(2951, 3421), Point(2958, 3415), Point(2965, 3412), Point(2965, 3400), Point(2965, 3392), Point(2966, 3380), Point(2955, 3380), Point(2949, 3374), Point(2945, 3370), Point(2965, 3371), Point(2963, 3360), Point(2964, 3351), Point(2968, 3341), Point(2973, 3379), Point(2980, 3378), Point(2988, 3371), Point(2996, 3366), Point(3006, 3362), Point(3013, 3355), Point(3019, 3362), Point(3007, 3350), Point(3007, 3342), Point(3007, 3331), Point(3007, 3321), Point(3006, 3313), Point(3015, 3350), Point(3023, 3351), Point(3021, 3340), Point(2995, 3302), Point(2983, 3294), Point(2971, 3292), Point(2962, 3292), Point(2949, 3292), Point(2937, 3292), Point(2932, 3291), Point(3006, 3301), Point(3007, 3295), Point(3006, 3286), Point(3013, 3276),
Point(3022, 3276), Point(3037, 3273), Point(3046, 3274), Point(3058, 3274), Point(3069, 3274), Point(3078, 3267), Point(3082, 3256), Point(3087, 3248), Point(3094, 3242), Point(2999, 3277), Point(2990, 3275), Point(2982, 3273), Point(2976, 3267), Point(2968, 3260), Point(2963, 3252), Point(2956, 3243), Point(2956, 3231), Point(2957, 3222), Point(2962, 3219), Point(2968, 3224), Point(2972, 3229), Point(2975, 3239), Point(2978, 3249), Point(2983, 3255), Point(2993, 3260), Point(3000, 3269), Point(3007, 3271), Point(2978, 3278), Point(2971, 3281), Point(2962, 3287), Point(2953, 3288), Point(3015, 3263), Point(3019, 3256), Point(3020, 3242), Point(3020, 3228), Point(3020, 3218), Point(3027, 3220), Point(3027, 3229), Point(3038, 3234), Point(3041, 3241), Point(3049, 3247), Point(3057, 3252), Point(3064, 3261), Point(3066, 3269), Point(3087, 3237), Point(3095, 3228), Point(3104, 3222), Point(3110, 3219), Point(3113, 3209), Point(3113, 3198), Point(3114, 3185), Point(3113, 3174), Point(3112, 3166),
Point(3122, 3217), Point(3131, 3216), Point(3144, 3211), Point(3153, 3204), Point(3163, 3197), Point(3177, 3195), Point(3191, 3193), Point(3198, 3193), Point(3210, 3188), Point(3217, 3183), Point(3224, 3173), Point(3231, 3153), Point(3214, 3151), Point(3201, 3152), Point(3188, 3154), Point(3176, 3154), Point(3165, 3152), Point(3153, 3149), Point(3147, 3146), Point(3151, 3161), Point(3147, 3168), Point(3144, 3181), Point(3141, 3190), Point(3140, 3200), Point(3138, 3207), Point(3236, 3176), Point(3239, 3184), Point(3241, 3195), Point(3236, 3203), Point(3234, 3213), Point(3226, 3217), Point(3234, 3222), Point(3233, 3189), Point(3224, 3188), Point(3201, 3182), Point(3193, 3159), Point(3229, 3145), Point(3222, 3150), Point(3198, 3174), Point(3198, 3167), Point(3227, 3232), Point(3221, 3243), Point(3219, 3211), Point(3213, 3205), Point(3203, 3210), Point(3195, 3217), Point(3185, 3219), Point(3176, 3223), Point(3170, 3226), Point(3161, 3227), Point(3149, 3227), Point(3137, 3228), Point(3127, 3229),
Point(3114, 3232), Point(3104, 3237), Point(3248, 3224), Point(3256, 3226), Point(3260, 3236), Point(3256, 3247), Point(3251, 3258), Point(3248, 3268), Point(3243, 3276), Point(3218, 3256), Point(3216, 3266), Point(3212, 3276), Point(3198, 3280), Point(3186, 3283), Point(3174, 3286), Point(3168, 3295), Point(3163, 3302), Point(3159, 3308), Point(3151, 3315), Point(3149, 3323), Point(3147, 3331), Point(3146, 3341), Point(3143, 3353), Point(3136, 3366), Point(3135, 3376), Point(3123, 3383), Point(3112, 3390), Point(3106, 3398), Point(3097, 3406), Point(3095, 3414), Point(3089, 3421), Point(3104, 3422), Point(3114, 3419), Point(3123, 3415), Point(3133, 3416), Point(3141, 3417), Point(3153, 3418), Point(3163, 3421), Point(3187, 3431), Point(3118, 3423), Point(3123, 3428), Point(3134, 3432), Point(3141, 3437), Point(3149, 3444), Point(3156, 3453), Point(3163, 3477), Point(3239, 3286), Point(3239, 3296), Point(3240, 3308), Point(3248, 3315), Point(3255, 3321), Point(3264, 3327), Point(3271, 3332),
Point(3282, 3338), Point(3289, 3347), Point(3294, 3353), Point(3296, 3363), Point(3295, 3375), Point(3294, 3385), Point(3293, 3399), Point(3291, 3411), Point(3287, 3422), Point(3281, 3429), Point(3270, 3430), Point(3261, 3430), Point(3254, 3427), Point(3248, 3430), Point(3240, 3431), Point(3229, 3430), Point(3223, 3430), Point(3208, 3429), Point(3165, 3485), Point(3164, 3463), Point(3171, 3456), Point(3255, 3421), Point(3262, 3417), Point(3258, 3407), Point(3254, 3401), Point(3250, 3392), Point(3238, 3389), Point(3225, 3391), Point(3213, 3391), Point(3212, 3401), Point(3212, 3412), Point(3214, 3423), Point(3206, 3409), Point(3199, 3419), Point(3182, 3451), Point(3187, 3440), Point(3171, 3430), Point(3180, 3430), Point(3197, 3430), Point(3291, 3375), Point(3288, 3367), Point(3287, 3354), Point(3212, 3378), Point(3204, 3374), Point(3194, 3373), Point(3183, 3371), Point(3178, 3381), Point(3172, 3392), Point(3170, 3407), Point(3171, 3419), Point(3178, 3359), Point(3177, 3346), Point(3177, 3335),
Point(3288, 3335), Point(3286, 3326), Point(3286, 3314), Point(3286, 3303), Point(3287, 3290), Point(3281, 3331), Point(3259, 3333), Point(3248, 3337), Point(3234, 3337), Point(3227, 3346), Point(3223, 3357), Point(3216, 3368), Point(3287, 3278), Point(3291, 3266), Point(3290, 3258), Point(3289, 3243), Point(3287, 3230), Point(3298, 3235), Point(3308, 3233), Point(3283, 3223), Point(3282, 3213), Point(3284, 3206), Point(3283, 3194), Point(3297, 3275), Point(3299, 3284), Point(3300, 3292), Point(3299, 3301), Point(3301, 3310), Point(3282, 3184), Point(3286, 3433), Point(3286, 3446), Point(3288, 3458), Point(3292, 3469), Point(3296, 3476), Point(3299, 3486), Point(3307, 3491), Point(3102, 3433), Point(3099, 3440), Point(3097, 3451), Point(3092, 3456), Point(3087, 3464), Point(3094, 3467), Point(3094, 3480), Point(3088, 3490), Point(3093, 3495), Point(3067, 3419), Point(3055, 3417), Point(3047, 3420), Point(3038, 3424), Point(3026, 3430), Point(3013, 3431), Point(2998, 3433), Point(2987, 3427),
Point(2982, 3418), Point(2972, 3414), Point(3141, 3310), Point(3130, 3303), Point(3123, 3299), Point(3086, 3285), Point(3076, 3280), Point(3178, 3310), Point(3187, 3303), Point(3190, 3291), Point(3178, 3324), Point(3177, 3317), Point(3173, 3312), Point(3162, 3312), Point(3078, 3418), Point(3090, 3406), Point(3087, 3400), Point(3081, 3391), Point(3076, 3378), Point(3072, 3365), Point(3070, 3353), Point(3066, 3340), Point(3063, 3326), Point(3050, 3319), Point(3038, 3319), Point(3024, 3317), Point(3014, 3315), Point(3076, 3341), Point(3078, 3329), Point(3079, 3317), Point(3077, 3305), Point(3077, 3293), Point(3114, 3294), Point(3103, 3293), Point(3094, 3289), Point(2957, 3211), Point(2972, 3218), Point(2980, 3220), Point(2988, 3221), Point(3002, 3218), Point(3011, 3215), Point(3243, 3167), Point(3233, 3164), Point(3278, 3174), Point(3271, 3167), Point(3266, 3173), Point(3261, 3172), Point(3091, 3448), Point(3091, 3439), Point(3089, 3430), Point(3079, 3423), Point(2500, 3190), Point(2510, 3189),
Point(2520, 3186), Point(2530, 3184), Point(2529, 3181), Point(2521, 3179), Point(2513, 3177), Point(2519, 3175), Point(2524, 3175), Point(2530, 3178), Point(2535, 3175), Point(2543, 3173), Point(2547, 3167), Point(2543, 3160), Point(2548, 3156), Point(2547, 3145), Point(2539, 3149), Point(2541, 3154), Point(2527, 3154), Point(2519, 3154), Point(2513, 3157)];
WorldM.Edge := [Point(0, 1), Point(1, 2), Point(2, 3), Point(3, 4), Point(4, 5), Point(4, 6), Point(6, 7), Point(7, 8), Point(8, 9), Point(9, 10), Point(10, 11), Point(11, 12), Point(12, 13), Point(13, 14), Point(14, 15), Point(11, 16), Point(16, 17), Point(17, 18), Point(18, 0), Point(11, 19), Point(15, 20), Point(20, 21), Point(21, 22), Point(22, 23), Point(23, 24), Point(24, 25), Point(25, 26), Point(26, 27), Point(27, 28), Point(28, 29), Point(29, 30), Point(30, 31), Point(31, 32), Point(32, 33), Point(33, 34), Point(34, 35), Point(35, 36), Point(36, 37), Point(37, 38), Point(38, 39), Point(39, 40), Point(40, 41), Point(41, 42), Point(42, 43), Point(43, 44), Point(44, 45), Point(45, 46), Point(46, 47), Point(47, 48), Point(48, 49), Point(49, 50), Point(50, 51), Point(51, 52), Point(52, 53), Point(53, 54), Point(54, 55), Point(55, 56), Point(56, 57), Point(57, 58), Point(58, 59), Point(59, 60), Point(60, 61), Point(60, 62), Point(62, 63), Point(56, 64), Point(64, 65), Point(65, 66),
Point(66, 67), Point(67, 68), Point(68, 69), Point(69, 70), Point(70, 71), Point(71, 72), Point(72, 73), Point(73, 74), Point(74, 75), Point(55, 76), Point(76, 77), Point(77, 78), Point(78, 79), Point(79, 80), Point(80, 81), Point(81, 82), Point(82, 83), Point(83, 84), Point(84, 85), Point(85, 86), Point(86, 87), Point(87, 88), Point(88, 89), Point(89, 90), Point(89, 91), Point(91, 92), Point(92, 93), Point(93, 94), Point(86, 95), Point(95, 96), Point(96, 97), Point(97, 98), Point(98, 99), Point(94, 100), Point(100, 79), Point(46, 101), Point(101, 102), Point(102, 103), Point(103, 104), Point(104, 105), Point(105, 106), Point(106, 107), Point(107, 108), Point(108, 109), Point(109, 110), Point(110, 111), Point(111, 112), Point(112, 113), Point(113, 114), Point(114, 115), Point(115, 116), Point(116, 117), Point(117, 118), Point(112, 119), Point(119, 120), Point(120, 121), Point(121, 122), Point(122, 123), Point(123, 124), Point(39, 125), Point(125, 126), Point(126, 127), Point(127, 128),Point(128, 129),
Point(129, 130), Point(130, 131), Point(131, 132), Point(132, 133), Point(133, 134), Point(134, 135), Point(135, 136), Point(136, 137), Point(137, 138), Point(138, 139), Point(139, 140), Point(140, 141), Point(141, 142), Point(142, 143), Point(143, 86), Point(136, 144), Point(144, 145), Point(145, 146), Point(146, 49), Point(63, 147), Point(147, 148), Point(148, 149), Point(149, 150), Point(150, 151), Point(151, 152), Point(152, 153), Point(153, 154), Point(154, 155), Point(155, 156), Point(156, 157), Point(156, 158), Point(158, 159), Point(159, 160), Point(160, 161), Point(161, 162), Point(75, 163), Point(163, 164), Point(164, 165), Point(164, 166), Point(164, 167), Point(167, 168), Point(168, 169), Point(169, 170), Point(170, 168), Point(170, 171), Point(171, 172), Point(172, 173), Point(173, 174), Point(173, 175), Point(175, 176), Point(176, 151), Point(70, 177), Point(177, 178), Point(178, 179), Point(179, 180), Point(180, 181), Point(181, 175), Point(157, 158), Point(81, 182), Point(166, 165),
Point(166, 183), Point(183, 184), Point(184, 185), Point(185, 186), Point(186, 187), Point(187, 188), Point(188, 189), Point(189, 190), Point(190, 191), Point(191, 192), Point(192, 193), Point(193, 194), Point(194, 195), Point(195, 196), Point(196, 197), Point(197, 198), Point(198, 199), Point(199, 200), Point(200, 201), Point(201, 202), Point(199, 203), Point(203, 204), Point(204, 205), Point(205, 206), Point(206, 207), Point(207, 208), Point(208, 209), Point(209, 210), Point(210, 211), Point(211, 212), Point(187, 213), Point(213, 186), Point(166, 214), Point(214, 215), Point(215, 216), Point(216, 217), Point(217, 218), Point(218, 219), Point(219, 220), Point(220, 155), Point(157, 221), Point(221, 222), Point(222, 223), Point(222, 224), Point(224, 225), Point(225, 226), Point(226, 217), Point(156, 221), Point(162, 227), Point(227, 228), Point(228, 229), Point(229, 230), Point(230, 231), Point(231, 232), Point(232, 233), Point(233, 234), Point(234, 235), Point(235, 236), Point(236, 237), Point(237, 238),
Point(238, 239), Point(239, 240), Point(240, 241), Point(241, 242), Point(243, 244), Point(244, 245), Point(245, 246), Point(246, 247), Point(247, 248), Point(248, 249), Point(249, 250), Point(250, 251), Point(251, 252), Point(252, 253), Point(253, 254), Point(252, 255), Point(255, 256), Point(256, 257), Point(257, 258), Point(258, 259), Point(242, 260), Point(260, 243), Point(259, 261), Point(254, 262), Point(261, 263), Point(263, 260), Point(247, 264), Point(99, 265), Point(265, 266), Point(266, 267), Point(267, 268), Point(268, 269), Point(269, 270), Point(270, 271), Point(271, 272), Point(272, 273), Point(274, 275), Point(275, 276), Point(276, 277), Point(277, 278), Point(278, 279), Point(279, 280), Point(280, 281), Point(281, 282), Point(282, 283), Point(283, 284), Point(284, 285), Point(285, 286), Point(286, 287), Point(287, 288), Point(288, 289), Point(289, 290), Point(290, 291), Point(291, 292), Point(292, 293), Point(293, 294), Point(294, 295), Point(295, 296), Point(296, 297), Point(296, 298),
Point(298, 299), Point(299, 300), Point(300, 301), Point(301, 302), Point(99, 303), Point(303, 304), Point(304, 305), Point(305, 306), Point(306, 307), Point(307, 308), Point(308, 309), Point(309, 310), Point(310, 311), Point(311, 312), Point(312, 302), Point(298, 297), Point(297, 299), Point(297, 313), Point(313, 314), Point(285, 315), Point(315, 316), Point(316, 317), Point(317, 318), Point(318, 319), Point(319, 320), Point(320, 321), Point(321, 322), Point(322, 323), Point(315, 286), Point(289, 324), Point(324, 288), Point(324, 325), Point(325, 326), Point(326, 327), Point(327, 328), Point(328, 329), Point(329, 330), Point(330, 331), Point(331, 332), Point(332, 333), Point(333, 334), Point(334, 335), Point(335, 336), Point(336, 337), Point(337, 338), Point(338, 339), Point(339, 340), Point(340, 341), Point(341, 342), Point(342, 343), Point(343, 344), Point(344, 345), Point(345, 346), Point(346, 347), Point(347, 348), Point(348, 349), Point(349, 350), Point(350, 351), Point(351, 352), Point(352, 349),
Point(349, 353), Point(353, 354), Point(354, 355), Point(355, 356), Point(356, 357), Point(357, 358), Point(358, 359), Point(359, 360), Point(360, 361), Point(361, 362), Point(362, 363), Point(363, 364), Point(364, 365), Point(365, 366), Point(338, 367), Point(367, 368), Point(368, 369), Point(369, 370), Point(370, 371), Point(371, 372), Point(372, 373), Point(373, 374), Point(374, 375), Point(375, 376), Point(376, 362), Point(376, 361), Point(264, 377), Point(377, 378), Point(378, 379), Point(379, 380), Point(380, 381), Point(377, 382), Point(382, 383), Point(383, 384), Point(384, 385), Point(385, 386), Point(386, 387), Point(387, 388), Point(388, 389), Point(389, 390), Point(390, 391), Point(391, 392), Point(389, 393), Point(393, 394), Point(394, 395), Point(395, 396), Point(389, 397), Point(397, 398), Point(398, 399), Point(399, 400), Point(400, 401), Point(401, 402), Point(401, 403), Point(402, 403), Point(401, 404), Point(404, 405), Point(405, 406), Point(406, 407), Point(407, 408), Point(404, 409),
Point(409, 402), Point(404, 402), Point(403, 410), Point(410, 410), Point(410, 411), Point(408, 412), Point(412, 413), Point(413, 414), Point(414, 415), Point(415, 416), Point(416, 417), Point(417, 418), Point(408, 419), Point(419, 420), Point(420, 421), Point(421, 422), Point(422, 423), Point(423, 424), Point(424, 425), Point(425, 426), Point(426, 427), Point(427, 428), Point(428, 429), Point(429, 430), Point(430, 431), Point(421, 432), Point(432, 422), Point(432, 433), Point(433, 434), Point(434, 435), Point(435, 436), Point(436, 437), Point(437, 438), Point(438, 439), Point(439, 440), Point(441, 442), Point(442, 443), Point(443, 444), Point(444, 445), Point(445, 446), Point(446, 447), Point(447, 448), Point(448, 449), Point(449, 422), Point(432, 449), Point(448, 432), Point(433, 450), Point(450, 451), Point(451, 452), Point(452, 453), Point(453, 416), Point(449, 454), Point(454, 455), Point(455, 456), Point(456, 457), Point(457, 458), Point(458, 459), Point(459, 460), Point(460, 461), Point(461, 462),
Point(462, 463), Point(463, 464), Point(464, 465), Point(465, 466), Point(466, 427), Point(430, 467), Point(467, 468), Point(468, 469), Point(469, 470), Point(470, 471), Point(471, 472), Point(472, 473), Point(473, 474), Point(474, 475), Point(470, 476), Point(476, 477), Point(477, 478), Point(478, 479), Point(479, 480), Point(480, 481), Point(481, 482), Point(482, 483), Point(483, 484), Point(484, 485), Point(485, 486), Point(488, 489), Point(489, 490), Point(490, 491), Point(491, 492), Point(492, 493), Point(493, 494), Point(493, 495), Point(495, 496), Point(496, 497), Point(497, 498), Point(498, 499), Point(499, 500), Point(500, 477), Point(486, 501), Point(501, 502), Point(502, 503), Point(503, 504), Point(504, 505), Point(505, 506), Point(505, 507), Point(503, 508), Point(508, 509), Point(509, 485), Point(484, 510), Point(511, 490), Point(487, 512), Point(512, 513), Point(513, 488), Point(510, 514), Point(514, 515), Point(515, 511), Point(507, 516), Point(516, 517), Point(506, 518), Point(518, 519),
Point(519, 520), Point(520, 521), Point(521, 522), Point(522, 523), Point(523, 524), Point(524, 525), Point(525, 526), Point(526, 527), Point(527, 528), Point(528, 529), Point(529, 530), Point(530, 431), Point(507, 531), Point(531, 532), Point(532, 533), Point(533, 534), Point(534, 535), Point(535, 536), Point(536, 537), Point(517, 538), Point(538, 539), Point(539, 540), Point(540, 541), Point(541, 542), Point(542, 543), Point(543, 544), Point(544, 545), Point(545, 546), Point(546, 547), Point(547, 548), Point(548, 549), Point(549, 550), Point(550, 551), Point(551, 552), Point(552, 553), Point(553, 554), Point(554, 555), Point(555, 556), Point(556, 557), Point(557, 558), Point(558, 559), Point(559, 560), Point(560, 561), Point(561, 562), Point(562, 563), Point(563, 564), Point(564, 565), Point(565, 566), Point(560, 568), Point(568, 569), Point(569, 570), Point(570, 571), Point(571, 572), Point(572, 573), Point(537, 575), Point(575, 576), Point(576, 577), Point(577, 578), Point(578, 579), Point(579, 580),
Point(580, 581), Point(581, 582), Point(582, 583), Point(583, 584), Point(584, 585), Point(585, 586), Point(586, 587), Point(587, 588), Point(588, 589), Point(589, 590), Point(590, 591), Point(591, 592), Point(592, 593), Point(593, 594), Point(594, 595), Point(595, 596), Point(596, 597), Point(597, 598), Point(598, 599), Point(574, 600), Point(573, 601), Point(601, 574), Point(601, 602), Point(594, 603), Point(603, 604), Point(604, 605), Point(605, 606), Point(606, 607), Point(607, 608), Point(608, 609), Point(609, 610), Point(610, 611), Point(611, 612), Point(612, 613), Point(613, 598), Point(613, 599), Point(611, 614), Point(614, 615), Point(602, 616), Point(616, 617), Point(617, 567), Point(566, 618), Point(618, 619), Point(619, 617), Point(567, 619), Point(599, 620), Point(620, 615), Point(620, 567), Point(620, 617), Point(587, 621), Point(621, 622), Point(622, 585), Point(622, 623), Point(623, 583), Point(610, 624), Point(624, 625), Point(625, 626), Point(626, 627), Point(627, 628), Point(628, 629),
Point(629, 630), Point(630, 631), Point(631, 618), Point(631, 566), Point(627, 632), Point(632, 633), Point(633, 634), Point(583, 635), Point(635, 636), Point(636, 637), Point(637, 638), Point(638, 639), Point(581, 640), Point(640, 636), Point(581, 641), Point(641, 642), Point(642, 643), Point(643, 644), Point(644, 645), Point(645, 646), Point(646, 624), Point(625, 646), Point(639, 647), Point(647, 648), Point(648, 649), Point(649, 650), Point(650, 651), Point(650, 652), Point(652, 653), Point(652, 651), Point(651, 654), Point(654, 655), Point(655, 656), Point(656, 657), Point(647, 658), Point(658, 659), Point(659, 660), Point(660, 661), Point(661, 662), Point(658, 648), Point(657, 663), Point(591, 664), Point(664, 590), Point(664, 665), Point(665, 666), Point(666, 667), Point(667, 668), Point(668, 669), Point(669, 670), Point(560, 671), Point(671, 672), Point(672, 673), Point(673, 674), Point(674, 675), Point(675, 676), Point(676, 677), Point(677, 678), Point(678, 679), Point(680, 681), Point(681, 682),
Point(682, 683), Point(683, 684), Point(684, 685), Point(685, 686), Point(686, 687), Point(687, 688), Point(688, 689), Point(689, 386), Point(547, 690), Point(690, 691), Point(691, 692), Point(693, 694), Point(694, 427), Point(695, 696), Point(696, 697), Point(697, 541), Point(697, 542), Point(634, 698), Point(698, 699), Point(699, 695), Point(695, 700), Point(700, 699), Point(700, 701), Point(701, 547), Point(559, 702), Point(702, 680), Point(558, 560), Point(558, 703), Point(703, 704), Point(704, 705), Point(705, 706), Point(706, 707), Point(707, 708), Point(708, 709), Point(709, 710), Point(710, 711), Point(711, 712), Point(712, 713), Point(713, 714), Point(714, 407), Point(714, 408), Point(708, 715), Point(715, 716), Point(716, 717), Point(717, 718), Point(718, 719), Point(719, 694), Point(692, 720), Point(720, 721), Point(721, 722), Point(722, 693), Point(440, 723), Point(723, 441), Point(441, 724), Point(724, 725), Point(725, 726), Point(726, 727), Point(727, 728), Point(728, 458), Point(501, 729),
Point(486, 730), Point(730, 501), Point(729, 730), Point(730, 487), Point(487, 513), Point(663, 731), Point(731, 732), Point(731, 733), Point(733, 732), Point(733, 734), Point(674, 735), Point(735, 736), Point(736, 737), Point(737, 738), Point(738, 680), Point(273, 739), Point(739, 274), Point(739, 740), Point(740, 741), Point(741, 742), Point(742, 743), Point(743, 744), Point(744, 745), Point(745, 746), Point(746, 747), Point(747, 748), Point(748, 749), Point(749, 750), Point(750, 751), Point(751, 752), Point(752, 753), Point(753, 754), Point(754, 755), Point(755, 756), Point(756, 757), Point(757, 758), Point(758, 759)];

End;

begin
SetupSRL;
SetUpReflection;
LoadWeb;
StartForm('CLocForm');
LoadWorldM;
LoadNodes('WorldM');
Locform.ShowModal;//shows the form
Locform.Free;//frees the object so it doesn't rape your memory
end.

i luffs yeww

2011-04-22 02:44:38

Forms with Simba are pretty iffy, iirc.

But..

From: Coh3n
Hit the Windows Key + R. The Run windows should appear.
Type in cmd, hit enter.
The command prompt should come up.
Type in cd "Simba.exe path here" (for me, it's cd c:/simba) and hit enter.
Type in simba.exe and hit enter.
Simba should now pop up and you'll see all the debug stuff in the command prompt.


Try that, and post what it comes up with.

(Main thread for Simba debugging here.)

sm0k3

2011-04-22 17:58:26

Thanks that worked . from the debug i figured out that i wass calling the for via thread safe call before setting up the form .

the only problem is that when this section runs ..


Function LoadNodes(WorldN: string): Boolean;
var
i: integer;
ii, Lc, Cvar, Nvar: string;
Begin
Lc := ReadINI('NODES','COUNT',ScriptPath+'Worlds\'+WorldN);
LocCOUNT := StrToInt(Lc);
Writeln('I Currently know '+ToStr(LocCOUNT)+' Locations');
for i := 0 to LocCOUNT do
begin
ii := ToStr(i);
try
Cvar := ReadINI(ii, 'NAME',ScriptPath+'Worlds\'+WorldN);
List.Items.Append(Cvar);
Nvar := ReadINI(ii, 'NODE',ScriptPath+'Worlds\'+WorldN);
Locations.Add(Nvar);
except
WriteLn('Failed to Read World Data!');
end
result := true;
end;
end;

it never reads the sections in the ini ..
it says
'I Currently know -1 Locations'

there are 55 locations in the ini

it should read the number of scripts and then fill the forms listbox with data from the ini .
but the forms listbox is allways empty

Sex

2011-04-22 18:26:43

You sure you saved the script? ScriptPath will only have a value if you are running a script that is saved. Also try using AppPath :p. StrToIntDef is useful as well.

sm0k3

2011-04-22 18:30:39

Yes i saved the script . and if i only check via writLn(ScriptPath);
i tells me the correct location . the only thing im thinking is i am using +scriptPath+'/Worlds'
cos the ini is in the worlds folder is this the problem ?

Sex

2011-04-22 19:00:10

What is WorldN?

sm0k3

2011-04-22 19:08:51

From: Sex
What is WorldN?


WorldN is a string . you would call the function like

LoadNodes('WorldM');

the function should then look in WorldM.ini first for the section nodes
and value COUNT < in the ini i have COUNT=55

it should then do do a
for 0 to 55 do to fill the list . here is the ini


[HikerWEBFILE]

[NODES]
COUNT=55

[0]
NAME=FALCONER_ENTRANCE
NODE=0

[1]
NAME=PISCATORIS_FISHING_COLONY
NODE=5

[3]
NAME=HUNTER_SW_FALCONER_ENTRANCE
NODE=19

[4]
NAME=TREE_GNOME_STRONGHOLD_ENTRANCE
NODE=39

[5]
NAME=ARDOUGNE_FARM
NODE=61

[6]
NAME=RANGING_GUILD
NODE=69

[7]
NAME=ARDOUGNE_SE_BANK
NODE=90

[8]
NAME=ARDOUGNE_CITY
NODE=92

[9]
NAME=BARBARIAN_AGILITY
NODE=118

[10]
NAME=BARBARIAN_FLY_FISHING
NODE=124

[11]
NAME=COMBAT_TRAINING_CAMP
NODE=130

[12]
NAME=SEERS_MAGIC_TREES
NODE=147

[13]
NAME=CATHERBY_BANK
NODE=157

[14]
NAME=SEERS_BANK
NODE=165

[15]
NAME=SEERS_YEW
NODE=169

[16]
NAME=SEERS_FLAX
NODE=174

[17]
NAME=ARDOUGNE_NORTH_BANK
NODE=182

[18]
NAME=RELLEKKA
NODE=202

[19]
NAME=KELDAGRIM_ENTRANCE
NODE=212

[20]
NAME=SINCLAIR_MANSION
NODE=213

[21]
NAME=CATHERBY_FARM
NODE=223

[22]
NAME=TAVERLEY
NODE=245

[23]
NAME=BURTHORPE
NODE=262

[24]
NAME=YANILLE_WEST_ENTRANCE
NODE=284

[25]
NAME=YANILLE_NE_MINING
NODE=302

[26]
NAME=YANILLE_BANK
NODE=314

[27]
NAME=CASTLE_WARS_BANK
NODE=323

[28]
NAME=FELDIP_HILLS
NODE=332

[29]
NAME=MOBILISING_ARMIES_BANK
NODE=352

[30]
NAME=OOGLOG_BANK
NODE=366

[31]
NAME=FALADOR
NODE=389

[32]
NAME=FALADOR_WEST_BANK
NODE=392

[33]
NAME=FALADOR_EAST_BANK
NODE=402

[34]
NAME=MINING_GUILD_FALADOR
NODE=411

[35]
NAME=CRAFTING_GUILD
NODE=418

[36]
NAME=DRAYNOR_BANK
NODE=431

[37]
NAME=RIMMINGTON_MINING
NODE=444

[38]
NAME=PORT_SARIM
NODE=459

[39]
NAME=WIZARD_TOWER
NODE=475

[40]
NAME=LUMBRIDGE_SW_MINING
NODE=494

[41]
NAME=LUMBRIDGE
NODE=506

[42]
NAME=LUMBRIDGE_SE_MINING
NODE=512

[43]
NAME=ZANARIS_ENTRANCE
NODE=515

[44]
NAME=GE
NODE=600

[44]
NAME=VARROCK_EAST_BANK
NODE=603

[45]
NAME=VARROCK_ESSENCE
NODE=606

[46]
NAME=VARROCK
NODE=613

[47]
NAME=VARROCK_WEST_BANK
NODE=617

[48]
NAME=VARROCK_SE_MINING
NODE=622

[49]
NAME=VARROCK_WEST_MINING
NODE=627

[50]
NAME=DUEL_ARENA
NODE=653

[51]
NAME=AL_KHARID_NORTH_MINING
NODE=662

[52]
NAME=LUMBER_YARD
NODE=670

[53]
NAME=EDGEVILLE_BANK
NODE=679

[54]
NAME=RIMMINGTON
NODE=723

[55]
NAME=TREE_GNOME_VILLAGE_DOOR
NODE=759

Sex

2011-04-22 19:12:12

There is your problem. Add .ini to the end.
Lc := ReadINI('NODES','COUNT',ScriptPath+'Worlds\'+WorldN+'.ini');

sm0k3

2011-04-22 20:03:14

it dosent find the file i dont think . because it still says

I Currently know -1 Locations

erm .. im not sure what going on
but the script just cant seem to read the ini or is it the way im filling the lists

Sex

2011-04-22 20:12:50

var
Count, i : integer;
Path : string;
begin
Path := ScriptPath + 'Worlds\test.ini';
Count := StrToInt(ReadINI('NODES', 'COUNT', Path));
for i := 0 to Count do
begin
Writeln(ReadINI(ToStr(i), 'NAME', Path));
Writeln(ReadINI(ToStr(i), 'NODE', Path));
end;
end.
Works for me.

sm0k3

2011-04-22 20:43:21

right it reads the file but its not adding to the TStringList . am i correct on using
Locations.Append(Svar);

locations is the TStringList and Svar is a variable that holds the current string to add

Sex

2011-04-22 20:54:15

Um, do you have TeamViewer? Let me connect :p.

sm0k3

2011-04-22 21:25:57

I am getting teamveiwer now . i have solved finding the ini now . but now simba crashes when i call WalkPath . ill show you when your ready

Sex

2011-04-22 21:26:28

Ready ;).

sm0k3

2011-04-22 21:28:17

Check your PM's