سلام
يه textbox دارم كه كاربر هر چي بخواد توش وارد مي كنه
ميخوام بعد اينكه كاربر كارش تموم شد و روي دكمه كليك كرد اعداد و حروف رو از هم جدا كنم و هر كدوم رو تو يه جاي ديگه نشون بدم
چطور اين كارو انجام بدم؟
Printable View
سلام
يه textbox دارم كه كاربر هر چي بخواد توش وارد مي كنه
ميخوام بعد اينكه كاربر كارش تموم شد و روي دكمه كليك كرد اعداد و حروف رو از هم جدا كنم و هر كدوم رو تو يه جاي ديگه نشون بدم
چطور اين كارو انجام بدم؟
سلام.
این تابع برای جدا کردن عدد:
اینم برای جدا کردن حروف:کد:public long GetVar(string txt)
{
string ret = "";
foreach (var chr in txt)
{
int i = Convert.ToInt32(chr);
if (i > 47 && i < 58)
{
ret += chr;
}
}
return Convert.ToInt64(ret);
}
موفق باشید.:10:کد:private string GetChar(string txt)
{
string ret = "";
foreach (var chr in txt)
{
int i = Convert.ToInt32(chr);
if (i < 48 || i > 57)
{
ret += chr;
}
}
return ret;
}
چرا از عبارات باقائده استفاده نمی کنید؟
کد:string str = "sldDESBHghljsfdg2REH345lkdfh";
Regex r = new Regex(@"(?<char>[a-z]+)(?<num>\d+)", RegexOptions.Compiled | RegexOptions.IgnoreCase);
MatchCollection mm = r.Matches(str);
string chr = "";
string num = "";
foreach (Match match in mm) {
chr += match.Result("${char}");
num += match.Result("${num}");
}
Console.WriteLine(chr + " " + num);
اينم تست كن
var i : Integer;
begin
for i:=1 to Length(Edit1.Text) do
try
StrToInt(Copy(Edit1.Text, i, 1));
Edit2.Text := Edit2.Text + Copy(Edit1.Text, i, 1)
except
Edit3.Text := Edit3.Text + Copy(Edit1.Text, i, 1)
end
سلام
ضمن تبریک عضویتان ...نقل قول:
اينم تست كن
بنظر میرسد کدهای شما مربوط به زبان دلفی است، به محل سوال در انجمن ها دقت کنید.