x[شرح|حفظ داتا فى ملف اكس ام ال]x

[Maksoud]

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

بدى اتعلم كيف احفظ الداتا فى ملف اكس ام ال...

مثلا لو سويت مود معرض سيارات

اقدر انى اشترى اكثر من سيارة

لو اشتريت مثلا

bmw

و

audi

اقدر انزلهم من اللوحة الخاصة حقتى

بس يكونوا متسجلين فى اللوحة بحيث انى لو خرجت و دخلت ما يروحوا

شكرا مقدما

[فاّرس]

الاكسمل سهل لو تركز فيه شوي بس, ذا مثال :

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
    local name = xmlCreateFile ( 'playerInfo.xml', 'Info' ) 
        xmlCreateChild( name, 'Name' ) 
            xmlCreateChild( name, 'Ping' ) 
                xmlSaveFile ( name ) 
    end 
) 
  
  
addCommandHandler ( 'saveMyInfo', function (  ) 
    local name = xmlLoadFile ( 'playerInfo.xml' ) 
        if name then 
            local n,p = xmlFindChild ( name, 'Name', 0 ),xmlFindChild ( name, 'Ping', 0 ) 
                xmlNodeSetValue ( n, getPlayerName ( localPlayer ) ) 
                    xmlNodeSetValue ( p, getPlayerPing ( localPlayer ) ) 
                        xmlSaveFile ( name ) 
                            xmlUnloadFile ( name ) 
    end 
end) 

^ سويته لك بأسهل طريقة ما استخدمت لوب او اي شي بطريقه سهله وواضحه,

بعكس اذا سويته بملف سيرفر راح يظهر بنفس مجلد السكربت mods للمعلوميه يوم تسوي الاكس ام ال بالكلينت راح يظهر في مسار

[Maksoud]

يوم اخلص المود بركز مع الاكس ام ال

لو انا حاولت و ما نجح راح تساعدنى و تصححلى اخطاء ؟

[Maksoud]

سويت لوحة فيها قريد ليست

لما احدد على رو بالقريد ليست و اضغط على زر يضيف الرو فى قريد ليست اخر

بدى احفظ الرو السويتله اضافة بالقريد ليست الاخر

ساعدونى شباب

[Maksoud]

[فاّرس]

اطرح كودك او محاولتك عشان نساعدك

[Maksoud]

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
local VehicleSave = xmlCreateFile ( 'Vehicles.xml', 'Vehicles' ) 
xmlCreateChild( VehicleSave, 'Vehiciles' ) 
xmlSaveFile ( VehicleSave ) 
end 
) 

addEvent("AddVehicle",true) 
addEventHandler("AddVehicle",root, 
function() 
local RowForRow, TheTextGrid = guiGridListAddRow(MyGrid), guiGridListGetSelectedItemText(VehGrid,column) 
guiGridListSetItemText(MyGrid,RowForRow,column,TheTextGrid,false,false) 
local RowForRow2, TheTextGrid2 = guiGridListAddRow(MyGrid), guiGridListGetSelectedItemText(VehGrid,2) 
guiGridListSetItemText(MyGrid,RowForRow,2,TheTextGrid2,false,false) 
    local VehicleSave = xmlLoadFile ( 'Vehiciles.xml' ) 
        if VehicleSave then 
            local n = xmlFindChild ( VehicleSave, 'Vehicles', 0 ) 
                xmlNodeSetValue ( n, guiGridListGetItemText(MyGrid) ) 
                        xmlSaveFile ( VehicleSave ) 
                            xmlUnloadFile ( VehicleSave ) 
end 
end 
) 

[Maksoud]

يا شاطح

[N3xT]

عدل أسم القريد سطر 9 لـ إسم القريد ليست حقك

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
    local veh = xmlCreateFile ( 'Vehicles.xml', 'Vehicle' ) 
        xmlCreateChild( veh, 'Name' ) 
        xmlCreateChild( veh, 'Ping' ) 
        xmlSaveFile ( veh ) 
    end) 

addEvent("AddVehicle",true) 
addEventHandler("AddVehicle",root, 
function() 
    local RowForRow, TheTextGrid = guiGridListAddRow(MyGrid), guiGridListGetSelectedItemText(VehGrid,column) 
    guiGridListSetItemText(MyGrid,RowForRow,column,TheTextGrid,false,false) 
    local RowForRow2, TheTextGrid2 = guiGridListAddRow(MyGrid), guiGridListGetSelectedItemText(VehGrid,2) 
    guiGridListSetItemText(MyGrid,RowForRow,2,TheTextGrid2,false,false) 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
    local select = guiGridListGetItemText (grid, guiGridListGetSelectedItem (grid), 1) 
    if veh then 
        local name = xmlFindChild ( veh, 'Vehicles', 0 ) 
        xmlNodeSetValue ( name, select ) 
        xmlSaveFile ( veh ) 
        xmlUnloadFile ( veh ) 
    end 
end) 

[' A F .]

^ guiGridListGetSelectedItemText to guiGridListGetItemText

[N3xT]

^ guiGridListGetSelectedItemText to guiGridListGetItemText

موجودة قبلها

[Maksoud]

xmlNodeSetValue ( name, select ) 

حبي نكست

فى خطأ فى ها الكود

الدي بق يقوول

WARNING: VehicleShop\Client.lua:115:Bad argument @ 'xmlNodeSetValue' [Expected xml-node at argument 1, got boolean]

ممكن حل سريعع ؟

[فاّرس]

Vehicle بـ Vehicles سطر 11 بدل

وين معرفه؟ guiGridListGetSelectedItemText سطر 6 الوظيفه ذي

[Maksoud]

function guiGridListGetSelectedItemText ( VehGrid, column ) 
    local item = guiGridListGetSelectedItem ( VehGrid ) 
    local text = guiGridListGetItemText ( VehGrid, item, column or 1 ) 
    if ( text ~= '' ) then 
        return text 
    else 
        return false 
    end 
end 

سويت تبديل ل

Vehicles

ب Vehicle

و نفس الخطأ

[Maksoud]

[Maksoud]

يا شباب !

[Maksoud]

يا شباااااب !!!!

[فاّرس]

انت كودك ملخبط مو نفس اللي تبيه لكن جرب كذا:

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
    local veh = xmlCreateFile ( 'Vehicles.xml', 'Vehicle' ) 
            xmlSaveFile ( veh ) 
end) 
  
addEvent("AddVehicle",true) 
addEventHandler("AddVehicle",root, 
function() 
    local RowForRow, TheTextGrid = guiGridListAddRow(MyGrid), guiGridListGetSelectedItemText(VehGrid,2) 
    guiGridListSetItemText(MyGrid,RowForRow,2,TheTextGrid,false,false) 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
    if veh then 
        local name = xmlCreateChild( veh, 'vehName' ) 
        xmlNodeSetValue ( name, TheTextGrid ) 
        xmlSaveFile ( veh ) 
        xmlUnloadFile ( veh ) 
    end 
end) 

[Maksoud]

اشتريت سيارة و الدي بق ما قال شئ

خرجت و دخلت

و فتحت اف 4

ما لقيت السيارة الاشتريتها

ملحوظة

اف 4 القريد ليست حقتها اسمها

MyGrid

القريد ليست حق المعرض اسمها

VehGrid

[Maksoud]

ساعدونى !!

[فاّرس]

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

خلي كودك كذا

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
    if not xmlLoadFile ( 'Vehicles.xml' ) then 
        local veh = xmlCreateFile ( 'Vehicles.xml', 'Vehicles' ) 
            xmlSaveFile ( veh ) 
    end 
end) 
  
addEvent("AddVehicle",true) 
addEventHandler("AddVehicle",root, 
function() 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
        if veh then 
            local name = xmlCreateChild( veh, 'vehName' ) 
                xmlNodeSetValue ( name, guiGridListGetSelectedItemText(VehGrid,2) ) 
                    xmlSaveFile ( veh ) 
                        xmlUnloadFile ( veh ) 
    end 
end) 

كـ مثال MyGrid وضيف هالكود في فتح النافذه حق

bindKey( 'F6', 'down', function () 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
        if veh then 
            guiGridListClear ( MyGrid ) 
            for k,v in ipairs ( xmlNodeGetChildren( veh ) ) do 
                local RowForRow, val = guiGridListAddRow( MyGrid ), xmlNodeGetValue ( v ) 
                    guiGridListSetItemText( MyGrid, RowForRow, 2, val, false, false ) 
            end 
                    xmlUnloadFile( veh ) 
        end 
    end 
) 

[Maksoud]

مشكور اخوى

بس فى خطأ

هو يجيب السعر و ما يجيب اسم السيارة

و لما عدلت عليه صار يجيب اسم السيارة فى مكان السيارة و مكان السعر

[Maksoud]

[فاّرس]

addEventHandler( 'onClientResourceStart', resourceRoot, function ( ) 
    if not xmlLoadFile ( 'Vehicles.xml' ) then 
        local veh = xmlCreateFile ( 'Vehicles.xml', 'Vehicles' ) 
            xmlSaveFile ( veh ) 
    end 
end) 
  
  
  
bindKey( 'F6', 'down', function () 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
        if veh then 
            guiGridListClear ( MyGrid ) 
                for k,v in ipairs ( xmlNodeGetChildren ( veh ) ) do 
                    local RowForRow = guiGridListAddRow( MyGrid ) 
                    guiGridListSetItemText( MyGrid, RowForRow, 1, xmlNodeGetAttributes ( v ).Name ,false, false) 
                    guiGridListSetItemText( MyGrid, RowForRow, 2, xmlNodeGetAttributes ( v ).Money, false, false) 
                end 
                    xmlUnloadFile( veh ) 
        end 
    end 
) 
  
addEvent("AddVehicle",true) 
addEventHandler("AddVehicle",root, 
function() 
    local veh = xmlLoadFile ( 'Vehicles.xml' ) 
    if veh then 
        local name = xmlCreateChild( veh, 'veh' ) 
        xmlNodeSetAttribute ( name, 'Name', guiGridListGetSelectedItemText( VehGrid, 1 ) ) 
          xmlNodeSetAttribute ( name, 'Money', guiGridListGetSelectedItemText( VehGrid, 2 ) ) 
        xmlSaveFile ( veh ) 
        xmlUnloadFile ( veh ) 
    end 
end) 

[Maksoud]

guiGridListSetItemText( MyGrid, RowForRow, 1, xmlNodeGetAttributes ( v ).Name ,false, false) 
                    guiGridListSetItemText( MyGrid, RowForRow, 2, xmlNodeGetAttributes ( v ).Money, false, false) 

الكودين دول فيهم خدأ يسوي لاق

الدي بق يقول :

expected string at argument 4

Edited July 12, 2016 by Guest