龟头发红并有轻微肿胀可能是由多种因素引起的，包括感染、过敏反应、刺激或损伤等。建议您立即停止性活动，并保持清洁和干燥。您可以尝试以下措施：

1. 冷敷：将冷水毛巾轻轻敷在发红的区域上，有助于减轻炎症和不适感。

2. 清洁：用温水和温和的无香料肥皂轻轻清洁龟头区域，然后用清水彻底冲洗，并确保彻底干燥。

3. 避免刺激：避免使用刺激性的化学物质或香皂清洁龟头区域，以免加重症状。

4. 观察：如果情况持续或加剧，建议尽快就医，以便获得专业诊断和治疗建议。

请注意，以上建议仅供参考，如有严重不适或症状持续，请及时就医。