Jump to content

تمت الافادة


Recommended Posts

لا تنسخه وتروح تعلم شلون صار , وادخل على الفنكشنات شفها : )

addEventHandler ( "onClientGUIClick", resourceRoot, 
    function (    ) 
        if ( source == اسم الزر ) then 
            executeCommandHandler ( "report" ) 
        end 
    end  
) 
Link to comment
لا تنسخه وتروح تعلم شلون صار , وادخل على الفنكشنات شفها : )

addEventHandler ( "onClientGUIClick", resourceRoot, 
    function (    ) 
        if ( source == اسم الزر ) then 
            executeCommandHandler ( "report" ) 
        end 
    end  
) 

ممكن بعد الاختيار ؟ يعني يختار النوع وكذا شكوة او استفسار

Link to comment

هوا قصده :

هوا سوا لوحة مثل لوحة الريبورت

وحط زرين

زر اغلاق وزر ارسال الشكوى

ويوم واحد يشتكي ويرسل الشكوى الرساله تروح للوحه

المتغير انه يبغا يغير شكل لوحة الريبورت فقط

وذا الكود المطلوب

addEventHandler ("onClientGUIClick",الزر,function () 
    local tableOut = {} 
    tableOut.category = "اكتب هنا السبب" 
    tableOut.subject = "اكتب هنا عنوان الرسالة" 
    tableOut.message = ""..guiGetText (GUIEditor.memo[4]).."\n"..guiGetText (GUIEditor.memo[3]).."/n"..guiGetText (GUIEditor.memo[2])..""..guiGetText (GUIEditor.memo[1]).."" 
    triggerServerEvent ( "aMessage", getLocalPlayer(), "new", tableOut ) 
 end) 

Link to comment
addEventHandler ("onClientGUIClick",الزر,function () 
    local tableOut = {} 
    tableOut.category = "اكتب هنا السبب" 
    tableOut.subject = "اكتب هنا عنوان الرسالة" 
    tableOut.message = ""..guiGetText (GUIEditor.memo[4]).."\n"..guiGetText (GUIEditor.memo[3]).."/n"..guiGetText (GUIEditor.memo[2])..""..guiGetText (GUIEditor.memo[1]).."" 
    triggerServerEvent ( "aMessage", getLocalPlayer(), "new", tableOut ) 
 end) 

ناقصة false عندك

وشكلك ناسخ الكود مسوي ترايقر طيب وين جانب السيرفر ؟؟ :lol::lol:

Link to comment
ترى انت تقدر تغير الشكوى وكذا من ملفات الادمنية نفسها -_-

انا ادري وانا سويت لوحة و مشتغلت هذي الاكواد اتمنى المساعدة

ReportW = nil 
  
function Oc ( player ) 
    if ( ReportW == nil ) then 
        local x, y = guiGetScreenSize() 
        ReportW = guiCreateWindow((screenW - 432) / 2, (screenH - 370) / 2, 432, 370, "][#[GTA-BJ] Report Panel ! ][", false) 
        guiWindowSetSizable(ReportW, false) 
        guiSetProperty(ReportW, "CaptionColour", "FF0214FA") 
        guiSetVisible (ReportW,false) 
        GUIEditor.label[1] = guiCreateLabel(10, 27, 78, 22, "Category :", false, ReportW) 
        guiSetFont(GUIEditor.label[1], "default-bold-small") 
        guiLabelSetColor(GUIEditor.label[1], 254, 239, 0) 
        GUIEditor.label[2] = guiCreateLabel(10, 80, 72, 22, "Subject :", false, ReportW) 
        guiSetFont(GUIEditor.label[2], "default-bold-small") 
        guiLabelSetColor(GUIEditor.label[2], 254, 239, 0) 
        Category = guiCreateEdit(88, 25, 228, 28, "Choose", false, ReportW) 
        Subject = guiCreateEdit(88, 74, 228, 28, "", false, ReportW) 
        GUIEditor.label[3] = guiCreateLabel(20, 113, 92, 23, "Message!  :", false, ReportW) 
        guiSetFont(GUIEditor.label[3], "default-bold-small") 
        guiLabelSetColor(GUIEditor.label[3], 253, 0, 0) 
        Message = guiCreateMemo(9, 136, 307, 176, "", false, ReportW) 
        Send = guiCreateButton(13, 318, 136, 44, "Send The Message !", false, ReportW) 
        guiSetProperty(Send, "NormalTextColour", "FFAAAAAA") 
        Close = guiCreateButton(164, 318, 136, 44, "Close The Window !", false, ReportW) 
        guiSetProperty(Close, "NormalTextColour", "FFAAAAAA") 
        Photo = guiCreateStaticImage(288, 25, 28, 28, "dropdown.png", false, ReportW) 
        Items = guiCreateGridList(87, 25, 229, 88, false, ReportW) 
        guiGridListAddColumn(Items, "", 0.9) 
        guiSetVisible ( Items, false ) 
        for i = 1, 5 do 
            guiGridListAddRow(Items) 
        end 
        guiGridListSetItemText(Items, 0, 1, "Question", false, false) 
        guiGridListSetItemText(Items, 1, 1, "Suggestion", false, false) 
        guiGridListSetItemText(Items, 2, 1, "Cheater/Moder", false, false) 
        guiGridListSetItemText(Items, 3, 1, "What This Mod ?", false, false) 
        guiGridListSetItemText(Items, 4, 1, "Other ...", false, false)     
    end 
) 
  
        addEventHandler ( "onClientGUIClick", ReportW, aClientReportClick ) 
        addEventHandler ( "onClientGUIDoubleClick", ReportW, aClientReportDoubleClick ) 
    end 
    guiBringToFront ( ReportW ) 
    showCursor ( true ) 
end 
addCommandHandler ( "report1", Oc ) 
  
function Close ( ) 
    if ( ReportW ) then 
        removeEventHandler ( "onClientGUIClick", ReportW, aClientReportClick ) 
        removeEventHandler ( "onClientGUIDoubleClick", ReportW, aClientReportDoubleClick ) 
        destroyElement ( ReportW ) 
        ReportW = nil 
        showCursor ( false ) 
    end 
end 
  
function aClientReportDoubleClick ( button ) 
    if ( button == "left" ) then 
        if ( source == Items ) then 
            if ( guiGridListGetSelectedItem ( Items ) ~= -1 ) then 
                local cat = guiGridListGetItemText ( Items, guiGridListGetSelectedItem ( Items ), 1 ) 
                guiSetText ( Items, cat ) 
                guiSetVisible ( Items, false ) 
            end 
        end 
    end 
end 
  
function aClientReportClick ( button ) 
    if ( source == OcCategory ) then 
        guiBringToFront ( Photo ) 
    end 
    if ( source ~= Items ) then 
        guiSetVisible ( Items, false ) 
    end 
    if ( button == "left" ) then 
        if ( source == Send ) then 
            if ( ( string.len ( guiGetText ( Subject ) ) < 1 ) or ( string.len ( guiGetText ( Message ) ) < 5 ) ) then 
                aMessageBox ( "error", "Subject/Message missing." ) 
            else 
                aMessageBox ( "info", "Your message has been submited and will be processed as soon as possible." ) 
                setTimer ( aMessageBoxClose, 3000, 1, true ) 
                local tableOut = {} 
                tableOut.category = guiGetText ( OcCategory ) 
                tableOut.subject = guiGetText ( Subject ) 
                tableOut.message = guiGetText ( Message ) 
                triggerServerEvent ( "aMessage", getLocalPlayer(), "new", tableOut ) 
                OcClose () 
            end 
        elseif ( source == Subject ) then 
             
        elseif ( source == Message ) then 
             
        elseif ( source == Close ) then 
            OcClose () 
        elseif ( source == Photo ) then 
            guiBringToFront ( Items ) 
            guiSetVisible ( Items, true ) 
        end 
    end 
end 

بعطيك شيء روح عدل ملف

Admin_report.lua

افضل واسهل :mrgreen:

Link to comment
addEventHandler ("onClientGUIClick",الزر,function () 
    local tableOut = {} 
    tableOut.category = "اكتب هنا السبب" 
    tableOut.subject = "اكتب هنا عنوان الرسالة" 
    tableOut.message = ""..guiGetText (GUIEditor.memo[4]).."\n"..guiGetText (GUIEditor.memo[3]).."/n"..guiGetText (GUIEditor.memo[2])..""..guiGetText (GUIEditor.memo[1]).."" 
    triggerServerEvent ( "aMessage", getLocalPlayer(), "new", tableOut ) 
 end) 

ناقصة false عندك

وشكلك ناسخ الكود مسوي ترايقر طيب وين جانب السيرفر ؟؟ :lol::lol:

انتا كل شيء ناسخ ناسخ

+

الكود مجرب من قبل انا سويت به مود وذا المود الى سويته

http://www.gta-arabs.com/gt/-mta-/12282 ... highlight=

ومابه ولا اي خطاء

Link to comment

انا مش عارف اي ام العجن اللي عملين تكتبو ده

مشكله اللوحه بتاعتك انك كاتب

local x, y = guiGetScreenSize()

وانت بتعمل اللوحه كتبت في مكانها

screenW - 400

المفروض

x - 400

اتعلم برمجه بدل منتا بتاخد اكواد...

Link to comment

العفو ي اخ

لكن حق سبب انتا تحطه يوم تسوي الوحه

وبي النسبه للكود

كل شيء تخليه زي ماهوا

لكن الـى يعطي امر الارسال

قصدي ذا

addEventHandler ("onClientGUIClick",الزر,function () 

محل كلمة الرز حق اسم الزر

يعني يوم واحد يكتب الشكوى حقته يضغط ارسال او نفس الزر ذا الرساله تروح للوحة الادمن

ملاحضه : لاتنس تحط اسم للزر + لاتس تحط زر لي الارسال واسم له

Link to comment
العفو ي اخ

لكن حق سبب انتا تحطه يوم تسوي الوحه

وبي النسبه للكود

كل شيء تخليه زي ماهوا

لكن الـى يعطي امر الارسال

قصدي ذا

addEventHandler ("onClientGUIClick",الزر,function () 

محل كلمة الرز حق اسم الزر

يعني يوم واحد يكتب الشكوى حقته يضغط ارسال او نفس الزر ذا الرساله تروح للوحة الادمن

ملاحضه : لاتنس تحط اسم للزر + لاتس تحط زر لي الارسال واسم له

طيب الميمو اغيرهم؟

لا لاتغيره

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...