Jump to content

سوال للمبرمجين الكبار .!

Adham

By Adham
in البرمجة

Recommended Posts

Adham Shooter

Adham

Posted
Posted (edited)

السلام عليكم ورحمه الله وبركاته ..!

اليوم سويت رنت سيستم . م علينا ...

ابي اسوي يوم يكتب في 3 ايديت ويحدد كومب بوكس وشيك بوكس

وضعط علي زرار ..

يجي في قريد لست اول قريد ..

- اسم الاعب

- الحددو في الكومب بوكس

- مميز or عادي 

- سريال 

------

كل ده سهل لاكن انا ابيه يتحفظ الكلام الجاء بالقريد لست يعني

انا روحت فتحت ف10

كتبت البيانات

وحددت المطلوب ..

وصاحب السرفر جاء فتح لوحه فيها قريد لست

يشوف الطلب القدمتو .!

ويشوف انا حددت عادي او مميز

الكود السويته اول واحد : 

addEventHandler ( "onClientGUIClick", resourceRoot,
    function ( btn )
        if source == GUIEditor.checkbox[1] then
            guiCheckBoxSetSelected ( GUIEditor.checkbox[2], not guiCheckBoxGetSelected ( source ) )
        elseif source == GUIEditor.checkbox[2] then
            guiCheckBoxSetSelected ( GUIEditor.checkbox[1], not guiCheckBoxGetSelected ( source ) )
                end
                if btn == "left" then
                    if source == GUIEditor.button[1] then
                        local item = guiComboBoxGetSelected ( com )    
                        local card = guiComboBoxGetItemText(com, item)
                        local name, email, number = guiGetText ( GUIEditor.edit[1] ), guiGetText ( GUIEditor.edit[2] ), guiGetText ( GUIEditor.edit[3] )
                        if name == "" or number == "" or card == "" then return end
                        if guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) then
                            triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "classic" )
                        elseif guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) then
                            triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "special" )
                        end
                        guiSetEnabled ( GUIEditor.button[1], false )
                   end
               end
            end
)
     
addEvent ( "RentSystem:onSendSubscribePlayers", true )
addEventHandler ( "RentSystem:onSendSubscribePlayers", root,
 function ( name, email, number, card, Serial, player )
          local row = guiGridListAddRow ( GUIEditor.gridlist[4] )
          guiGridListSetItemText( GUIEditor.gridlist[4], row, 1,player, false, false)
          guiGridListSetItemText(GUIEditor.gridlist[4], row, 4, Serial , false, false)
          guiGridListSetItemText(GUIEditor.gridlist[4], row, 2, card, false, false)
          guiGridListSetItemColor ( GUIEditor.gridlist[4], row, 1, 255, 255, 0 )
          guiGridListSetItemColor ( GUIEditor.gridlist[4], row, 2, 255, 255, 0 )
          guiGridListSetItemColor ( GUIEditor.gridlist[4], row, 3, 255, 255, 0 )
          guiGridListSetItemColor ( GUIEditor.gridlist[4], row, 4, 255, 255, 0 )
      end
 )    

التاني : 

function RentSysteam (   )
            if ( source == GUIEditor.checkbox[1] ) then
                guiCheckBoxSetSelected ( GUIEditor.checkbox[2], not guiCheckBoxGetSelected ( source ) )
            elseif ( source == GUIEditor.checkbox[2] ) then
                guiCheckBoxSetSelected ( GUIEditor.checkbox[1], not guiCheckBoxGetSelected ( source ) )
          end
            elseif ( source == GUIEditor.button[1] ) then
                 local item = guiComboBoxGetSelected ( com )    
                 local card = guiComboBoxGetItemText( com, item )
                 local name = guiGetText ( GUIEditor.edit[1] )
                 local email = guiGetText ( GUIEditor.edit[2] )
                 local number = guiGetText ( GUIEditor.edit[3] )
                 if name == "" and email == "" and number == "" and card == "" then return end
            if guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "classic" )
            elseif guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "special" )
           end
                 guiSetEnabled ( GUIEditor.button[1], false )
    end 
  end
end
addEventHandler ( 'onClientGUIClick', root,RentSysteam )
addEvent ( "RentSystem:onSendSubscribePlayers", true )
addEventHandler ( "RentSystem:onSendSubscribePlayers", root,
     function ( Table, bool )
         for k,v in ipairs( Table ) do
            local row = guiGridListAddRow ( gridlist )
                guiGridListSetItemText ( gridlist , row,1 , v.Name:gsub("#%x%x%x%x%x%x", ""), false , false ) 
            else
                guiGridListSetItemText ( gridlist , row,1 , v.Name, false , false ) 
          end
               guiGridListSetItemText ( gridlist , row,2 , v.card, false , false ) 
         if  bool == "classic"
               guiGridListSetItemText ( gridlist , row,3 , " مميز", false , false ) 
        else
               guiGridListSetItemText ( gridlist , row,3 , " عادي", false , false ) 
        end
              guiGridListSetItemText ( gridlist , row,1 , v.Serial, false , false ) 
          end
)


            والكود تبع الحفظ : 

addEventHandler ("onResourceStart", resourceRoot,
function () 
executeSQLQuery ("CREATE TABLE IF NOT EXISTS `Save_Columns` (serial,Column1,Column2,Column3)")
end
) 



addEvent ( "load:Columns", true ) 
addEventHandler ( "load:Columns", root,
function () 
local result = executeSQLQuery ( "SELECT * FROM `Save_Columns` WHERE `serial` = ?", getPlayerSerial (source) ) 
if ( result and #result == 0 ) then 
else 
triggerClientEvent ( source, "Get:Columns",source,result ) 
end
end
)

addEvent("save",true) 
addEventHandler("save",root,
function ( Column1,Column2,Column3 ) 
executeSQLQuery("INSERT INTO Save_Columns(serial,Column1,Column2,Column3) VALUES(?,?,?,?)",getPlayerSerial(source),Column1,Column2,Column3) 
end
)

 

مش عارف انهن الصح ومش عارف اركبهم مع بعض

Edited by Deativated
Link to comment
Adham Shooter

Adham

Posted
  • Author
Posted (edited)

طيب شوف الكود السويته وم ظبت

كلنت : 

--- Client

triggerServerEvent("Save", localPlayer)

addEventHandler ( 'onClientGUIClick', root,
     function (   )
         if ( source == TheButton ) then
                  local item = guiComboBoxGetSelected ( com )    
                 local card = guiComboBoxGetItemText( com, item )
                 local name, email,number = guiGetText ( edit1 ), guiGetText ( edit2 ), guiGetTet ( edit3 )
                 if #name > 0 and #email > 0 and number > 0 and #card > 0 then
        if ( guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "classic" )
        elseif ( guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "special" )
        end
                 guiSetEnabled ( GUIEditor.button[1], false )
      end
    end
end )

                 
                 
addEvent ( "RentSystem:onSendSubscribePlayers", true )
addEventHandler ( "RentSystem:onSendSubscribePlayers", root,
      function ( Table )
         for _,v in ipairs ( Table ) do  
              local row = guiGridListAddRow ( gridlist )         
              guiGridListSetItemText ( gridlist , row,1 , v.Name , false , false )
              guiGridListSetItemText ( gridlist , row,2 , v.card , false , false )
              guiGridListSetItemText ( gridlist , row,4 , v.Serial , false , false ) 
         end
    end
)



سرفر-- 

addEventHandler ("onResourceStart", resourceRoot,
   function () 
     executeSQLQuery ("CREATE TABLE IF NOT EXISTS `Save_Table` (serial,Name,card,Serial)")
end
) 
addEvent ( 'RentSystem:onCreateNewOrder', true )
addEventHandler ( 'RentSystem:onCreateNewOrder', root,
     function ( name, email, number, card )
           if ( name and email and number and card ) then
               local Name = getPlayerName ( source )
               local serial = getPlayerSerial ( source )
               local result = executeSQLQuery ( "SELECT * FROM `Save_Table` WHERE `serial` = ?", getPlayerSerial (source) ) 
               if ( result and #result == 0 ) then 
         else 
               triggerClientEvent ( source, "RentSystem:onSendSubscribePlayers",source,result ) 
       end 
     end
   end
)


addEvent("save",true) 
addEventHandler("save",root,
     function ( Name,Serial,card ) 
          executeSQLQuery("INSERT INTO Save_Table(serial,Name,Serial,card) VALUES(?,?,?,?)",getPlayerSerial(source),Name,Serial,card) 
     end

       

 

Edited by Deativated
Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted
6 minutes ago, Deativated said:

طيب شوف الكود السويته وم ظبت

كلنت : 


--- Client

triggerServerEvent("Save", localPlayer)

addEventHandler ( 'onClientGUIClick', root,
     function (   )
         if ( source == TheButton ) then
                  local item = guiComboBoxGetSelected ( com )    
                 local card = guiComboBoxGetItemText( com, item )
                 local name, email,number = guiGetText ( edit1 ), guiGetText ( edit2 ), guiGetTet ( edit3 )
                 if #name > 0 and #email > 0 and number > 0 and #card > 0 then
        if ( guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "classic" )
        elseif ( guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "special" )
        end
                 guiSetEnabled ( GUIEditor.button[1], false )
      end
    end
end )

                 
                 
addEvent ( "RentSystem:onSendSubscribePlayers", true )
addEventHandler ( "RentSystem:onSendSubscribePlayers", root,
      function ( Table )
         for _,v in ipairs ( Table ) do  
              local row = guiGridListAddRow ( gridlist )         
              guiGridListSetItemText ( gridlist , row,1 , v.Name , false , false )
              guiGridListSetItemText ( gridlist , row,2 , v.card , false , false )
              guiGridListSetItemText ( gridlist , row,4 , v.Serial , false , false ) 
         end
    end
)



سرفر-- 

addEventHandler ("onResourceStart", resourceRoot,
   function () 
     executeSQLQuery ("CREATE TABLE IF NOT EXISTS `Save_Table` (serial,Name,card,Serial)")
end
) 
addEvent ( 'RentSystem:onCreateNewOrder', true )
addEventHandler ( 'RentSystem:onCreateNewOrder', root,
     function ( name, email, number, card )
           if ( name and email and number and card ) then
               local Name = getPlayerName ( source )
               local serial = getPlayerSerial ( source )
               local result = executeSQLQuery ( "SELECT * FROM `Save_Table` WHERE `serial` = ?", getPlayerSerial (source) ) 
               if ( result and #result == 0 ) then 
         else 
               triggerClientEvent ( source, "RentSystem:onSendSubscribePlayers",source,result ) 
       end 
     end
   end
)


addEvent("save",true) 
addEventHandler("save",root,
     function ( Name,Serial,card ) 
          executeSQLQuery("INSERT INTO Save_Table(serial,Name,Serial,card) VALUES(?,?,?,?)",getPlayerSerial(source),Name,Serial,card) 
     end

       

 

  1. triggerServerEvent("Save", localPlayer)

ليش برا الاليفينت يا غالي

Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted (edited) 
addEventHandler ( 'onClientGUIClick', root,
     function (   )
         if ( source == TheButton ) then
                  local item = guiComboBoxGetSelected ( com )    
                 local card = guiComboBoxGetItemText( com, item )
                 local name = guiGetText ( edit1 )
      local email= guiGetText ( edit2 )
      local number=guiGetTet ( edit3 )
                 if #name > 0 and #email > 0 and number > 0 and #card > 0 then
        if ( guiCheckBoxGetSelected ( GUIEditor.checkbox[1] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "classic" )
        elseif ( guiCheckBoxGetSelected ( GUIEditor.checkbox[2] ) ) then
                 triggerServerEvent ( "RentSystem:onCreateNewOrder", localPlayer, name, email, number, card, "special" )
        end
      end
    end
end )

                 
                 
addEvent ( "RentSystem:onSendSubscribePlayers", true )
addEventHandler ( "RentSystem:onSendSubscribePlayers", root,
      function ( Table )
         for _,v in ipairs ( Table ) do  
              local row = guiGridListAddRow ( gridlist )         
              guiGridListSetItemText ( gridlist , row,1 , v.name , false , false )
              guiGridListSetItemText ( gridlist , row,2 , v.email , false , false )
              guiGridListSetItemText ( gridlist , row,4 , v.number , false , false ) 
                    guiGridListSetItemText ( gridlist , row,4 , v.card , false , false ) 

         end
    end
)



سرفر-- 

addEventHandler ("onResourceStart", resourceRoot,
   function () 
     executeSQLQuery ("CREATE TABLE IF NOT EXISTS `Save_Table` (name,email,number,card)")
end
) 
addEvent ( 'RentSystem:onCreateNewOrder', true )
addEventHandler ( 'RentSystem:onCreateNewOrder', root,
     function ( name, email, number, card )
           if ( name and email and number and card ) then
               local result = executeSQLQuery ( "SELECT * FROM `Save_Table` WHERE `card` = ?",card) 
                     local result2 = executeSQLQuery ( ' SELECT * FROM `Save_Table` ') 

               if (not result and #result == 0 ) then 
executeSQLQuery("INSERT INTO Save_Table(name,email,number,card) VALUES(?,?,?,?)", name, email, number,card )
        outputChatBox("تم بنجاح",source)
               triggerClientEvent (  "RentSystem:onSendSubscribePlayers",source,result2 ) 

         else 
                outputChatBox("لقد تم تقديم طلبك بالفعل",source)

       end 
     end
   end
)

الكود غير مجرب واعتذر نسيتك نزلت اصلي ونسيت +_+

@Deativated

لكن ما فهمت وش تبي بذول 

"classic" ؟

special?

Edited by Master_MTA
Link to comment
Adham Shooter

Adham

Posted
  • Author
Posted

مش بيجي في القريد لست

وبعدين انا م ابي يجي الكتبو في القريد لست

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

getPlayerName

و التاني الحددو في الكومب بوكس

والرابع السريال

Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted
15 minutes ago, Deativated said:

مش بيجي في القريد لست

وبعدين انا م ابي يجي الكتبو في القريد لست

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

getPlayerName

و التاني الحددو في الكومب بوكس

والرابع السريال

هل تاكدت الجريد لست تحتوي على 4 كولمن؟؟

ووش طلع لك بالديبق

واعرض اكواد الجريد لست

Link to comment
Adham Shooter

Adham

Posted
  • Author
Posted

اها م في شي بالدي بقي

وبعدين اقرا كلامي زين انا م ابي يطلع الكتبو بالايديت في القريد لست انا ابي يطلع اول كلوم اسم الاعب والتاني الكتبو في الكومب بوكس والرابع سريال الاعب

Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted
1 minute ago, Deativated said:

اها م في شي بالدي بقي

وبعدين اقرا كلامي زين انا م ابي يطلع الكتبو بالايديت في القريد لست انا ابي يطلع اول كلوم اسم الاعب والتاني الكتبو في الكومب بوكس والرابع سريال الاعب

تقدر تعدل بنفسك عطيتك الفكره انا لكن كذا تبيني اسويلك كود جاهز اعذرني اتعب واعرض محاولاتك وما اقصر معك

Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted (edited)
24 minutes ago, Deativated said:

انا عارض محاولتي فوق ,, واذا م تعرف تسويه خلي غيرك يسوي  و م قلت لك سويه جاهز انت مسوه كلو غلط بالدي بق

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

ربي يخليك لهم ويهديك عشانهم انا اسف اني اساعدك 

بس سؤال كيف كذا

اها م في شي بالدي بقي

ثم ترجع تقول كذا

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

+كيف كذا اخوي   والتاني الكتبو في الكومب بوكس

اتمنى تعدل كلامك اسمه ايديت بوكس 

سبحان اللذي انعم علينا بنعمة العقل

Edited by Master_MTA
  • Like 2
Link to comment
Abu-Solo Loc

Abu-Solo

Posted
Posted
9 minutes ago, Master_MTA said:

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

ربي يخليك لهم ويهديك عشانهم انا اسف اني اساعدك 

بس سؤال كيف كذا

اها م في شي بالدي بقي

ثم ترجع تقول كذا

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

+كيف كذا اخوي   والتاني الكتبو في الكومب بوكس

اتمنى تعدل كلامك اسمه ايديت بوكس 

سبحان اللذي انعم علينا بنعمة العقل

xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:xD:lol:

الله يرجك

  • Like 1
Link to comment
Adham Shooter

Adham

Posted
  • Author
Posted

طيب ,, الموضوع صار سالفه  AbuSolo علي وش تضحك

@ Master : وشو دخل اسلوبي واهلي بالموضوع ؟؟ 

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

 

وبعدين .. انا ابي

لما يكتب في 3 ايديت ويحدد كومب بوكس  ..

ويضعط علي زر يجي في القريد لست

اسم الاعب مب الفيه الايديت اسم الاعب القدم الطلب

والتاني الحددو الكومب بوكس والرابع السريال

.! ويتحفظ

Link to comment
Abu-Solo Loc

Abu-Solo

Posted
Posted
15 minutes ago, Deativated said:

طيب ,, الموضوع صار سالفه  AbuSolo علي وش تضحك

@ Master : وشو دخل اسلوبي واهلي بالموضوع ؟؟ 

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

 

وبعدين .. انا ابي

لما يكتب في 3 ايديت ويحدد كومب بوكس  ..

ويضعط علي زر يجي في القريد لست

اسم الاعب مب الفيه الايديت اسم الاعب القدم الطلب

والتاني الحددو الكومب بوكس والرابع السريال

.! ويتحفظ

ع الاقل حاول يساعدك

بما ان ماحد ساعدك والموضوع صارله اكثر من يومين ولاحد ساعدك

هو الوحيد اللي حاول يساعدك

وانت فشلته

 

Link to comment
Master_MTA Hoo-Rider

Master_MTA

Posted
Posted
39 minutes ago, Abu-Solo said:

ع الاقل حاول يساعدك

بما ان ماحد ساعدك والموضوع صارله اكثر من يومين ولاحد ساعدك

هو الوحيد اللي حاول يساعدك

وانت فشلته

 

بوسولو المشكله مب بكذا المشكله اني قلتله الكود غير مجرب+قلتله عطني الاخطاء اللي بالديبق قالي مافي

ثم يرجع يقولي في معبي خلاص اخوي كنت قلتها من اول

+بالنسبه لطلبك اخوي

  1. executeSQLQuery("INSERT INTO Save_Table(name,email,number,card) VALUES(?,?,?,?)", name, email, number,card )

بتعدل على هذا السطر

nameبدلها بي

getPlayerName(source)

email

بدلها بname

وهكذا

Link to comment
Abu-Solo Loc

Abu-Solo

Posted
Posted (edited)
1 minute ago, Master_MTA said:

بوسولو المشكله مب بكذا المشكله اني قلتله الكود غير مجرب+قلتله عطني الاخطاء اللي بالديبق قالي مافي

ثم يرجع يقولي في معبي خلاص اخوي كنت قلتها من اول

+بالنسبه لطلبك اخوي

  1. executeSQLQuery("INSERT INTO Save_Table(name,email,number,card) VALUES(?,?,?,?)", name, email, number,card )

بتعدل على هذا السطر

nameبدلها بي

getPlayerName(source)

email

بدلها بname

وهكذا

ليه تساعده مره ثانيه؟
هو ما يبيك تساعده

خلاص خلي المبرمجين المحترفين يساعدونه :|

تتعب نفسك واخرتها يفشلك قدام الناس...
 

Edited by Abu-Solo
  • Like 2
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
Go to topic listing

  • Recently Browsing   0 members

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