السلام عليكم
إخواني
وجدت هذا الكود بالـ++C وسيعينني على عملي لكن لم أستطع تحويله للدلفي لأكمل العمل - ولا أعرف السي ++
هذا هو الكود (يقوم بوضع كل كلمة في سطر إنطلاقا من جملة)
int main()
{
string strtext("khiro c++ delphi");
int iLength = strtext.length();
for (int i=0;i<=iLength;i++)
{ if (!(strtext==' '))
{
cout<<strtext;
}
else
cout<<endl;
}
return 0;
}
**********
وهذه محاولتي لتحويله للدلفي لكني أخفقت لأنه يقوم بوضع كل حرف في سطر
var text:string;
ilengt,i :Integer;
//---------------------------
begin
i:=0;
text:='khiro c++ delphi' ;
ilengt:=length(text); ;
//---------------------------
for i := 0 to ilengt do
begin
if text<>(' ') then
Writeln(text) ;
end;
Readln;
end.
هل من خبير في اللغتين معا يستطيع التحويل بينهما؟؟؟
أرجو أن تنقذوني إخواني .. أنتظركم ......
