帮忙啊！！

Question

请问：
    怎样在Combobox中加入字体名称进行字体选择？
    如何在memo中只选择一段字符进行字体、大小、颜色的修改而不改变全部字符？
    先谢谢了！

Answer 1

for i := 0 to screen.Fonts.Count - 1 do
  begin
    Combobox1.Items.Add(Screen.Fonts.Strings[i]);
  end;
  Combobox1.ItemIndex := combobox1.Items.IndexOf('宋体');

Answer 2

怎样在Combobox中加入字体名称进行字体选择？
答：
procedure TForm1.FormCreate(Sender: TObject);
begin
ComboBox1.Items:=screen.Fonts;
end;
如何在memo中只选择一段字符进行字体、大小、颜色的修改而不改变全部字符？
答：
TMemo可以处理多行文本，但对全部文本只提供一种字体。
你可以改用RichEdit,,,去书店看看书啊！！好多例子都可以回答你的，不懂才问，csdn是很团结的！！

Answer 3

多谢各位！
    不才再问一个：
    怎样在memo的文字中使用这些item项啊？

Answer 4

兄弟，不行啊！  一运行，comcobox内的项目全部被调到memo里去了，还把memo里的所有字符删掉了！
    再想想啊！
    谢谢了！

Answer 5

if combobox1.itemindex <> -1 then 
  memo1.lines.add(combobox1.items.strings[combobox1.itemindex])