View Full Version : سوال: پيرامون TStringList
pad_kay
دوشنبه 27 خرداد 1387, 14:46 عصر
با سلام خدمت دوستان
همانگونه كه مي دانيد در هنگام اضافه كردن به TStringList به انتهايي هر سطر Enter نيز اضافه مي شود به چه صورت مي توان آخيرين Enter رو از حذف كرد
با تشكر
Hsimple11
دوشنبه 27 خرداد 1387, 16:35 عصر
همانگونه كه مي دانيد در هنگام اضافه كردن به TStringList به انتهايي هر سطر Enter نيز اضافه مي شود به چه صورت مي توان آخيرين Enter رو از حذف كرد
با تشكر
با سلام. منظورتون رو واضح تر بیان کنید. به انتهای هر سطر enter اضافه نمیشود. در واقع این شمایید که String های مختلف را جداگانه وارد میکنید. اگر میخواهید رشته هایی که وارد میکنید در خطوط جداگانه ذخیره نشوند بایستی آنها را در یکبار add یا assign کردن به لیست رشته های خود وارد کنید. این مثال را ببینید :
var
StringList: TStrings;
begin
StringList := TStringList.Create;
try
with StringList do begin
Add('This example uses A string List.');
Add('It is the easiest way to add strings');
Add('to a list of strings.');
Add('Always remember TStrings.Create method');
Add('is abstract; So use TStringList.Create');
Add('method instead.');
end;
with listbox1 do begin
Width := 210;
Items.Assign(StringList);
ItemIndex := 0;
end;
finally
StringList.free;
end;
end;
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.