[طلب فنكشنات]

غلبتك معي والله

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

[طلب فنكشنات]

كيف

انا عندي برنامج

db browser for SQlite

ورحت ملف

auto login

واسوي له اكسبورت ويجيب لي الاسم والحساب والسيريال ؟

جربت يطلع لي كذا :

UserName,PassWord,Serial

فارغ

[طلب فنكشنات]

حبيبي والله عناد

هسا لو بدي اجيب باس واحد معين اقدر ولا ماقدر ؟

لأن الاسم والباس ينحفظ

[طلب فنكشنات]

في هذا الكود

-- Client 
    addEventHandler("onClientGUIClick",getRootElement(), 
        function () 
            local user = guiGetText(lName) 
            local pass = guiGetText(lPass) 
            local ruser = guiGetText(rName) 
            local rpass = guiGetText(rPass) 
            if ( source == login ) then 
                triggerServerEvent("onlogin",getLocalPlayer(),user,pass, guiCheckBoxGetSelected ( ........ ) ) 
            elseif ( source == register ) then 
                triggerServerEvent("onre",getLocalPlayer(),ruser,rpass) 
            end 
        end 
    ) 
  

شفت محل النقاط ^

حط بداله تعريف التشيك بوكس حق الدخول التلقائي

يعني مثلاً

checkedBox = guiCreateCheckBox(20,30,150,20,"Checked checkbox",true,false,guiWindow) 

checkedBox خذ

---

-- Client  
addEventHandler ( "onClientResourceStart", resourceRoot, 
    function ( ) 
        triggerServerEvent ( "onCheckAutoLogin", localPlayer ) 
    end 
) 
  
addEvent ( "onOpenLoginWindow", true ) 
addEventHandler ( "onOpenLoginWindow", root, 
    function ( )  
        showChat(false) 
        guiSetVisible (wnd, true ) 
        guiSetVisible (register, true ) 
        guiSetVisible ( login, true ) 
        setTimer ( move, 1000, 1 )   
    end 
) 

-- Server 
local AutoLogin_DB = dbConnect ( "sqlite", "AutoLogin.db" ) 
dbExec ( AutoLogin_DB, "CREATE TABLE IF NOT EXISTS `AutoLogin` (`UserName`, `PassWord`, `Serial`)") 
  
addEvent ( "onCheckAutoLogin", true ) 
addEventHandler ( "onCheckAutoLogin", root, 
    function ( ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
        if #DB > 0 then  
            local user, pass = tostring(DB[1].UserName), tostring(DB[1].PassWord) 
            local account = getAccount ( user, pass ) 
            if account then          
                logIn ( source, account, pass ) 
                triggerClientEvent ( source, "hide", resourceRoot )              
            else 
                triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
            end 
        else 
            triggerClientEvent ( source, "onOpenLoginWindow", resourceRoot )     
        end 
    end 
) 
  
addEvent ( "onlogin", true ) 
addEventHandler ( "onlogin", root, 
    function ( user, pass, auto ) 
        local account = getAccount ( user, pass ) 
        if account then 
            if logIn ( source, account, pass ) then 
                triggerClientEvent ( source, "hide", resourceRoot ) 
                if auto then 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then 
                        dbExec ( AutoLogin_DB, "UPDATE `AutoLogin` SET `UserName`=?,`PassWord`=? WHERE `Serial`=?", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    else 
                        dbExec ( AutoLogin_DB, "INSERT INTO `AutoLogin` VALUES(?,?,?)", tostring(user), tostring(pass), tostring(getPlayerSerial (source)) ) 
                    end 
                else 
                    local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( source )) ), -1 ) 
                    if #DB > 0 then                  
                        dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(source)) ) 
                    end 
                end 
            else 
                outputChatBox ( "* Account already in use.", source, 255, 0, 0 ) 
            end 
        else 
            outputChatBox ( "* Worng Username Or Password.", source, 255, 0, 0 ) 
        end 
    end 
) 
  
addCommandHandler ( "disableAuto",  
    function ( player ) 
        local DB = dbPoll ( dbQuery ( AutoLogin_DB, "SELECT * FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial ( player )) ), -1 ) 
        if #DB > 0 then                  
            dbExec ( AutoLogin_DB, "DELETE FROM `AutoLogin` WHERE `Serial`=?", tostring(getPlayerSerial(player)) ) 
            outputChatBox ( "* Auto-Login has been disabled.", player, 0, 255, 0 ) 
        end  
    end 
) 

ضفت لك كوماند حق إلغاء الدخول التلقائي

disableAuto

* لم يتم التجربة, رد خبر

حبيبي عناد والله الله يخليك الله يوفقك الله يعطيك الي تبيه يا رب : )

شكرا والله الاكواد شغاله حبيبي والله الله يخليك يا رب

[طلب فنكشنات]

اظهار النافذه

addEventHandler("onClientResourceStart", resourceRoot, 
    function() 
    showChat(false) 
guiSetVisible (wnd, true ) 
guiSetVisible (register, true ) 
guiSetVisible ( login, true ) 
    setTimer ( move, 1000, 1 ) 
    end 
) 

وش تقصد بالثانية وش اطرح

[طلب فنكشنات]

addEventHandler("onClientGUIClick",getRootElement(), 
    function () 
        local user = guiGetText(lName) 
        local pass = guiGetText(lPass) 
        local ruser = guiGetText(rName) 
        local rpass = guiGetText(rPass) 
        if ( source == login ) then 
            triggerServerEvent("onlogin",getLocalPlayer(),user,pass) 
        elseif ( source == register ) then 
            triggerServerEvent("onre",getLocalPlayer(),ruser,rpass) 
        end 
    end 
) 

عند الضغط . .

[طلب فنكشنات]

SQl انا بستخدم

لكن كيف بالله تساعدني

ماعندي خبرة بتاتاً وياليت تساعدني

SQL والله صعب ال

[طلب فنكشنات]

loginكود السيرفر حق ال

addEvent("onlogin",true) 
addEventHandler("onlogin",getRootElement(), 
    function (user,pass) 
        local account = getAccount(user,pass) 
        if ( account ) then 
        logIn(source,account,pass) 
    triggerClientEvent(source,"hide",source) 
            else 
            outputChatBox("* Worng Username Or Password",source,255,0,0) 
        end 
    end 
) 

[طلب فنكشنات]

onClientGUIClick -- Event 
xmlLoadFile 
xmlCreateFile 
xmlNodeSetValue 
xmlCreateChild 
xmlNodeSetAttribute 
xmlSaveFile 
xmlUnloadFile 
  
onClientResourceStart -- Event 
xmlLoadFile 
xmlFindChild 
xmlNodeGetValue 
  

جبت الموضوع

هذي الفنكشنات

لكن ممكن شرح

xml لأني صرآحة ماعندي خبرة نهائياً بموضوع الـ

[طلب فنكشنات]

السلام عليكم

سويت لوحة تسجيل

سويت التسجيل والريجستري وكل شيء

الحين الي ابغاه هو :

auto login ابي فنكشنات حق حفظ الاكاونت وال

واذا يحط صح على حفظ الحساب يوم يرجع الحساب يكون محفوظ والباس check boxيعني يكون

والسلام عليكم

[طلب افنت]

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

[طلب افنت]

ياخي الكود والله معرفه فوق الكودين ذول لكن ما طرحته ما عليك من التعريف

تمام يعني اسوي لوب كذا :

for i,v in ipairs(getElementsByType("player")) do 

وتمام ؟

[طلب افنت]

الفنكشن معروف لكن ما طرحته ^

وش احط مكان السورس ؟

[طلب افنت]

addEventHandler ( "onClientGUIClick", resourceRoot, function (    ) 
        if( source == button) then 

اشوف الترايقر أحـسن .. كيف اسوي ترايقر من الكلنت للسيرفر فقط ؟

[طلب افنت]

addEventHandler("onPlayerLogin", root, 
       function () 
              if ( isPlayerInGroup ( source ) ) then 
                     setElementData ( source, "un", true ) 
              else 
                     setElementData ( source, "un", false ) 
              end 
       end 
) 
  

addEventHandler("onResourceStart", resourceRoot, 
       function () 
              if ( isPlayerInGroup ( source ) ) then 
                     setElementData ( source, "un", true ) 
              else 
                     setElementData ( source, "un", false ) 
              end 
       end 
) 

[طلب افنت]

طيب مشكورين

ابي مثلاً يوم يضغط الزر يتحقق اذا هو بالقروب كيف أسويها ؟

سوي داتا اذ الاعب سجل دخوله

طبعا تتحقق انه بالقروب

تحط له الداتا بـ setElementData

والشي الثاني

الثاني اذ المود اشتغل

تستخدم الonResuorceStart

وتجيب الاعبين

وتتحقق ان اللاعب بالقروب

و تحط له الداتا بـ setElementData

واذ كنت مو شايل logout

من اف 8

سوي نفس حقت تسجيل الدخول لكن حطها false

وبعدين اذ ضغط الزر

getElementData تتحقق من الداتا بـ

onResourceStart

هذا ما يشتغل معي ^

onPlayerLogin

هذا يحتاج الاعب يطلع ويدخل مرة ثانية ومدري وش

مافي شيء آخر استخدمه

[طلب افنت]

طيب مشكورين

ابي مثلاً يوم يضغط الزر يتحقق اذا هو بالقروب كيف أسويها ؟

[طلب افنت]

addEventHandler("onPlayerLogin".....................................

التحقق يصير يوم الاعب يسجل دخول

طيب انا عطيته رتبه وهو لازم يطلع ويدخل عشان يصير بالقروب

ابغى افنت بنفس الوقت تتحقق من انه في الجروب ذا اتمنى انك فهمت قصدي وشكرا

[طلب افنت]

مو مشكلة الزر في كود واحد مسويه يمنع الزر طيب

بس الافنت ابي واحد غيره لأن لآزم الاعب يطلع ويدخل من جديد ومدري وش .. مافي افنت بدون التسجيل يعني .

[طلب افنت]

السلام عليكم

سويت تحقق ان اذا كان الاعب في قروب معين يغلق ال ان ميوت

لكن الحد هو يوم الاعب يسجل

طيب صارت مشكلة يوم اعطي رتبه الاعب يقدر يفك ميوت الا اذا سجل دخول من جديد ما يقدر فهذا الحدث مو كويس

ابي حدث اخر ما لقيت ممكن مُساعددة

[طلب كود]

الكود حقه شغال ^

[طلب فنكشناتنات]

يعيال وش بكم مابي بالسيريال وهذا مستحيل ان كل لاعب ياخذ سيارة اسجل سيريالات

بس ابي وظيفه ان الموتر ما يقدر احد يركبها ووش الفنكشنات

وابي لسيارة واحده فقط مو لكل السيارات اتمنى انكم فهمتوني

[طلب فنكشناتنات]

السلام عليكم

ابي فنكشنات

الي يخلي سيارة للاعب معين يعني سيارة خاصة

مثل نظام الاستئجار يمنع دخول اي لاعب اخر غير صاحب السيارة

وشكراً ..

[ممكن مساعدة في قريد ليست شباب]

تمام مشكور لكن قلت من قبل ان الكود اشتغل , وكودك تمام اشتغل شكراً ..

عندي طلب ثاني اسف شباب

مثلن بدي اسوي سحب سيارة

سويت الكود لكن ما اشتغل ممكن تصحيح ؟

كلنت

    elseif source == destroy then  
    if ( guiGridListGetSelectedItem ( playerList ) ~= -1 ) then 
    local pd= guiGridListGetItemText ( playerList, guiGridListGetSelectedItem ( playerList ), 1 ) 
    triggerServerEvent ( "VDestroy", localPlayer, vd )  
end 

سيرفر

addEvent( "VDestroy", true) ----destroy car 
addEventHandler( "VDestroy", getRootElement(), 
function ( PlayerNick ) 
    local d = getPlayerFromName ( PlayerNick ) 
    local name = getPlayerName ( source ) 
    local theVehicle = getPedOccupiedVehicle ( d ) 
    if ( isElement(theVehicle) ) then 
         destroyElement ( theVehicle ) 
         outputChatBox("#ff0000".. d .." Vehicle has Been destroyed", source, 255, 0, 0, true ) 
    end 
end ) 
  
  
  

وين المُشكلة اعرف انه خطا لكن حاولت بنفسي وشكرن مقدمن

[ممكن مساعدة في قريد ليست شباب]

تمام مشكور لكن قلت من قبل ان الكود اشتغل , وكودك تمام اشتغل شكراً ..

عندي طلب ثاني اسف شباب

مثلن بدي اسوي سحب سيارة

سويت الكود لكن ما اشتغل ممكن تصحيح ؟

كلنت

    elseif source == destroy then  
    if ( guiGridListGetSelectedItem ( playerList ) ~= -1 ) then 
    local vd= guiGridListGetItemText ( playerList, guiGridListGetSelectedItem ( playerList ), 1 ) 
    triggerServerEvent ( "VDestroy", localPlayer, vd )  
end 

سيرفر

addEvent( "VDestroy", true) ----destroy car 
addEventHandler( "VDestroy", getRootElement(), 
function ( PlayerNick ) 
    local d = getPlayerFromName ( PlayerNick ) 
    local name = getPlayerName ( source ) 
    local theVehicle = getPedOccupiedVehicle ( d ) 
    if ( isElement(theVehicle) ) then 
         destroyElement ( theVehicle ) 
         outputChatBox("#ff0000".. d .." Vehicle has Been destroyed", source, 255, 0, 0, true ) 
    end 
end ) 
  
  
  

وين المُشكلة اعرف انه خطا لكن حاولت بنفسي وشكرن مقدمن