2ちゃんねるブラウザ「OpenJane」 @Windows Part 6

>>580

ゴメン俺、かなり前にソースいじってたんだ。

UWriteForm
Ctrl+Enterで書き込み

procedure TWriteForm.MemoKeyDown(Sender: TObject; var Key: Word;

if ssCtrl in Shift then
Memo.SelectAll;
end;
//　此処から追加
VK_RETURN:
begin
if ssCtrl in Shift then
ButtonWrite.OnClick(Sender);
end;
//此処まで追加
end;
end;