217 alanı olan csv oluşturma

[greenegitim]

Merhaba,
ebay in turbo programının örnek bir csv şablonu var stok modülümden buna uygun csv çıkartmam lazım örnek csv de tam 217 alan var ve bu alan isimlerinde boşluk / . gibi karakterlerde var daha önce buna benzer daha az alan olan bir csv hazırlarken kbmMemTable kullanmıştım alan oluşturuken boşluk v.s isim verebiliyoruz sıkıntı yok şimdi bu ebay csv dosyasında çok uzun alan isimleri var
örnek: BuyerRequirementDetails/MaximumUnpaidItemStrikesInfo/Period bunu kbmMemTable da yeni field olarak tanımlayamıyorum 31 karakter kısıtlaması var fieldname de fdmemtable da aynı şekilde bu sorunu nasıl aşabilirim kendi stok tablomdaki ilgili yerleri bu csv formatında çıkarmam gerekiyor csvdeki alanlar aşağıdaki gibi

Kod: Tümünü seç

Site
Format
Currency
Title
Condition
ConditionDescription
SubtitleText
Custom Label
Description
Category 1
Category 2
Store Category
Store Category 2
PicURL
Quantity
LotSize
Duration
Starting Price
Reserve Price
BIN Price
Private Auction
Counter
Buyer pays shipping
Payment Instructions
Specifying Shipping Costs
Insurance Option
Insurance Amount
Sales Tax Amount
Sales Tax State
Apply tax to total
Accept PayPal
PayPal Email Address
Accept MO Cashiers
Accept Personal Check
Accept Visa/Mastercard
Accept AmEx
Accept Discover
IntegratedMerchantCreditCard
Accept Payment Other
Accept Payment Other Online
Accept COD
COD PrePay Delivery
Postal Transfer
Payment See Description
Accept Money Xfer
CCAccepted
CashOnPickupAccepted
MoneyXferAccepted
MoneyXferAcceptedinCheckout
Ship-To Option
Escrow
BuyerPaysFixed
Location - City/State
Location - Country
Title Bar Image
Gallery1.Gallery
Gallery Featured
FeaturedFirstDuration
Gallery URL
PicInDesc
PhotoOneRadio
PhotoOneURL
Gallery2.GalleryPlus
Bold
MotorsGermanySearchable
Border
LE.Highlight
Featured Plus
Home Page Featured
Subtitle in search results
Gift Icon
DepositType
DepositAmount
ShippingRate
ShippingCarrier
ShippingType
ShippingPackage
ShippingIrregular
ShippingWeightUnit
WeightMajor
WeightMinor
MeasurementUnit
CODCost
PackageDimension
ShipFromZipCode
PackagingHandlingCosts
Year
MakeCode
ModelCode
EngineCode
ThemeId
LayoutId
AutoPay
Apply Multi-item Shipping Discount
Attributes
Package Length
Package Width
Package Depth
ShippingServiceOptions
VATPercent
ProductID
ProductReferenceID
UseStockPhotoURLAsGallery
IncludeStockPhotoURL
IncludeProductInfo
UniqueIdentifier
GiftIcon.GiftWrap
GiftIcon.GiftExpressShipping
GiftIcon.GiftShipToRecipient
InternationalShippingServiceOptions
Ship-To Locations
Exclude Ship-To Locations
Exclude Ship-To Type Locations
Rate Tables Domestic
Rate Tables International
Zip
BuyerRequirementDetails/LinkedPayPalAccount
PM.PaisaPayAccepted
PaisaPayEscrowEMI
LE.ProPackBundle
BestOfferEnabled
LiveAuctionDetails/LotNumber
LiveAuctionDetails/SellerSalesNumber
LiveAuctionDetails/LowEstimate
LiveAuctionDetails/HighEstimate
LiveAuctionDetails/eBayBatchNumber
LiveAuctionDetails/eBayItemInBatch
LiveAuctionDetails/ScheduleID
LiveAuctionDetails/UserCatalogID
Item.ExportedImages
PhotoDisplayType
TaxTable
LoanCheck
CashInPerson
HoursToDeposit
DaysToFullPayment
UserHostedOptimizePictureWellBitmap
BuyerResponsibleForShipping
GetItFast
DispatchTimeMax
CharityID
CharityName
DonationPercentage
AutoDecline
ListingDetails/MinimumBestOfferPrice
ListingDetails/MinimumBestOfferMessage
LE.ValuePackBundle
LE.ProPackPlusBundle
LE.BasicUpgradePackBundle
LocalOnlyChk
ListingDetails/LocalListingDistance
ContactPrimaryPhone
ContactSecondaryPhone
LocationInfo
ExtendedSellerContactDetails/ClassifiedAdContactByEmailEnabled
ppl_PhoneEnabled
BuyerRequirementDetails/ShipToRegistrationCountry
BuyerRequirementDetails/ZeroFeedbackScore
BuyerRequirementDetails/MinimumFeedbackScore
BuyerRequirementDetails/MaximumUnpaidItemStrikesInfo
BuyerRequirementDetails/MaximumUnpaidItemStrikesInfo/Count
BuyerRequirementDetails/MaximumUnpaidItemStrikesInfo/Period
BuyerRequirementDetails/MaximumItemRequirements/MaximumItemCount
BuyerRequirementDetails/MaximumItemRequirements/MinimumFeedbackScore
BuyerRequirementDetails/VerifiedUserRequirements/VerifiedUser
BuyerRequirementDetails/VerifiedUserRequirements/MinimumFeedbackScore
DisableBuyerRequirements
BuyerRequirementDetails/MaximumBuyerPolicyViolations/Count
BuyerRequirementDetails/MaximumBuyerPolicyViolations/Period
Domestic Insurance Option
Domestic Insurance Amount
GlobalShippingService
PickupAndDropoffService
eBayPlus
InternationalShippingType
InternationalPackagingHandlingCosts
Domestic Profile Discount
International Profile Discount
Apply Profile Domestic
Apply Profile International
SellerTags
AutoAccept
ListingDetails/BestOfferAutoAcceptPrice
eBayNotes
Paymate
ProPay
Moneybookers
StandardPayment
UPC
ITEM_SHIPPING_POLICYID
ITEM_PAYMENT_POLICYID
ITEM_RETURN_POLICYID
ITEM_SHIPPING_POLICYNAME
ITEM_PAYMENT_POLICYNAME
ITEM_RETURN_POLICYNAME
PromoteCBT
ReturnsAccepted
ReturnsWithin
Refund
ShippingCostPaidBy
ReturnsRestockingFee
ExtendedHolidayReturns
WarrantyOffered
WarrantyType
WarrantyDuration
ReturnsDetail
WofGMarketplace
WofGCategoryID
WofGDescription
WofGProducerInfo
WofGRegionOfOrigin
WofProduceerPictureURL
WofGQuestionSet
WofGTrustProvider
Fitments
Variations
PictureURL

[freeman35]

neden aynı bu string i field adı olarak kullanmak zorundasın? bunları caption yapabilirsin
field ını bulmak içinde Tstringlist içine alıp
Site=F1
Format=F2
gibi String ve value şekline çevirip, Stringten ki bunu caption a atmışsan TStringsList.Values[] ve strings[] leden birbirlerine ulaşabilirsin. Ben bzaen bu mantığı kullanırım.

[greenegitim]

Hocam işin gerçeği kolay diye bu şekilde kullanıyordum daha önce buna benzer bir şeyde kbmMemTable.insert kbmMemTable.post arasına hızlıca döngüyle alanları aktarıp kbmMemTable ı export ederek işimi halediyordum şimdi yarına kadar bunu bitirmem gerektiği için aynı şekilde kullanayım dedim ama olmadı. şimdiki düşüncem bir stringliste döngüyle ilk döngüde alanları başlıkları aktarıp daha sonra değerleri aktarmak olacak. sizin verdiğiniz mantığıda deneyeceğim daha önce pek stringlistlerde çalışmadım teşekürler.

[m_yaprakci]

Degerleri memtable ile bildiginiz usulde cekip captionlari da exporttan hemen once export edeceginiz dosyaya ekleyin.

[greenegitim]

Tstringslist kullanarak halletim

Kod: Tümünü seç

Memo2.Lines.Add(EbayIlkSatir); // ilk satırdaki başlıkları getir Site;Format; gibi
SL.Values[ 'Site'] :='77;';
SL.Values[ 'Format'] :='9;';
SL.Values[ 'Currency'] :='7;';
SL.Values[ 'Title'] :=EbayToptanIsimOlustur+';';   // ALMANCA İSİM ÜRET
SL.Values[ 'Condition'] :='1000;';
SL.Values[ 'ConditionDescription'] :=';';
.....

Memo2.Lines.Add
(
SL.Values[ 'Site' ]+
SL.Values[ 'Format' ]+
SL.Values[ 'Currency' ]+
SL.Values[ 'Title' ]+
SL.Values[ 'Condition' ]+....

Excelden çok faydalandım (birleştir özeliği ile )